/ Time Gal / Time Gal.iso / movie / C1 / C1.rsrc / VWAC_1024

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 6f 02 01 00 00 03 01 | 01 85 04 01 01 8a 05 01 |.o......|........|
|00000010| 01 bf 06 01 02 ff 07 01 | 03 3f 08 01 04 24 09 01 |........|.?...$..|
|00000020| 04 5e 0a 01 04 80 0b 01 | 05 0c 0c 01 05 2f 00 00 |.^......|...../..|
|00000030| 06 f4 0d 01 06 f4 0e 01 | 07 61 0f 01 08 5b 10 01 |........|.a...[..|
|00000040| 08 7f 11 01 08 fa 12 01 | 0b 2a 13 01 0b b6 14 01 |........|.*......|
|00000050| 0c ed 15 01 0d 66 16 01 | 0d 87 17 01 0e 00 18 01 |.....f..|........|
|00000060| 0e 22 19 01 0f 1c 1a 01 | 10 16 00 00 11 0f 1b 01 |."......|........|
|00000070| 11 0f 00 00 11 bc 1c 01 | 11 bc 1d 01 12 35 1e 01 |........|.....5..|
|00000080| 12 58 1f 01 12 72 20 01 | 12 eb 21 01 13 11 22 01 |.X...r .|..!...".|
|00000090| 14 3f 23 01 15 75 24 01 | 15 e4 25 01 16 52 26 01 |.?#..u$.|..%..R&.|
|000000a0| 16 c0 27 01 17 3a 28 01 | 17 b5 29 01 18 e3 2a 01 |..'..:(.|..)...*.|
|000000b0| 19 52 2b 01 19 c0 2c 01 | 1a 41 00 00 1a af 00 00 |.R+...,.|.A......|
|000000c0| 1a af 2d 01 1a af 2e 01 | 1b 36 2f 01 1c 64 30 01 |..-.....|.6/..d0.|
|000000d0| 1c d3 31 01 1d 41 32 01 | 1d af 00 00 1e e4 00 00 |..1..A2.|........|
|000000e0| 1e e4 33 01 1e e4 00 00 | 1f e5 34 01 1f e5 00 00 |..3.....|..4.....|
|000000f0| 20 e4 35 01 20 e4 36 01 | 21 de 37 01 22 d8 38 01 | .5. .6.|!.7.".8.|
|00000100| 23 d1 39 01 26 04 3a 01 | 26 5b 3b 01 26 bc 3c 01 |#.9.&.:.|&[;.&.<.|
|00000110| 27 35 3d 01 27 f5 3e 01 | 28 ab 3f 01 29 62 40 01 |'5=.'.>.|(.?.)b@.|
|00000120| 2a 18 41 01 2a ce 42 01 | 2b 86 43 01 2c 3e 00 00 |*.A.*.B.|+.C.,>..|
|00000130| 2c f6 00 00 2c f6 00 00 | 2c f6 00 00 2c f6 00 00 |,...,...|,...,...|
|00000140| 2c f6 00 00 2c f6 00 00 | 2c f6 00 00 2c f6 00 00 |,...,...|,...,...|
|00000150| 2c f6 00 00 2c f6 00 00 | 2c f6 00 00 2c f6 00 00 |,...,...|,...,...|
|00000160| 2c f6 00 00 2c f6 00 00 | 2c f6 00 00 2c f6 00 00 |,...,...|,...,...|
|00000170| 2c f6 00 00 2c f6 00 00 | 2c f6 00 00 2c f6 00 00 |,...,...|,...,...|
|00000180| 2c f6 00 00 2c f6 00 00 | 2c f6 00 00 2c f6 00 00 |,...,...|,...,...|
|00000190| 2c f6 00 00 2c f6 44 01 | 2c f6 00 00 2d fa 00 00 |,...,.D.|,...-...|
|000001a0| 2d fa 45 01 2d fa 00 00 | 2e 87 00 00 2e 87 00 00 |-.E.-...|........|
|000001b0| 2e 87 00 00 2e 87 46 01 | 2e 87 47 01 2e 9e 4b 00 |......F.|..G...K.|
|000001c0| 2f 83 67 6c 6f 62 61 6c | 20 70 75 73 68 74 2c 70 |/.global| pusht,p|
|000001d0| 75 73 68 70 2c 68 61 6c | 66 2c 73 63 6f 72 65 2c |ushp,hal|f,score,|
|000001e0| 70 6c 61 79 65 72 0d 0d | 69 66 20 28 28 68 61 6c |player..|if ((hal|
|000001f0| 66 20 3d 20 30 29 20 61 | 6e 64 20 28 70 6c 61 79 |f = 0) a|nd (play|
|00000200| 65 72 20 3c 3d 20 35 29 | 29 20 74 68 65 6e 20 0d |er <= 5)|) then .|
|00000210| 20 20 20 20 70 75 74 20 | 69 6e 74 65 67 65 72 28 |    put |integer(|
|00000220| 70 6c 61 79 65 72 20 2b | 20 31 29 20 69 6e 74 6f |player +| 1) into|
|00000230| 20 70 6c 61 79 65 72 0d | 65 6e 64 20 69 66 0d 0d | player.|end if..|
|00000240| 2d 2d 83 7b 81 5b 83 69 | 83 58 0d 69 66 20 68 61 |--.{.[.i|.X.if ha|
|00000250| 6c 66 20 3d 20 30 20 74 | 68 65 6e 20 0d 20 20 20 |lf = 0 t|hen .   |
|00000260| 20 70 75 74 20 69 6e 74 | 65 67 65 72 28 31 30 30 | put int|eger(100|
|00000270| 30 30 20 2b 20 73 63 6f | 72 65 29 20 69 6e 74 6f |00 + sco|re) into|
|00000280| 20 67 65 74 0d 65 6c 73 | 65 0d 20 20 20 20 70 75 | get.els|e.    pu|
|00000290| 74 20 69 6e 74 65 67 65 | 72 28 35 30 30 30 20 2b |t intege|r(5000 +|
|000002a0| 20 73 63 6f 72 65 29 20 | 69 6e 74 6f 20 67 65 74 | score) |into get|
|000002b0| 0d 65 6e 64 20 69 66 0d | 70 75 74 20 73 74 72 69 |.end if.|put stri|
|000002c0| 6e 67 28 67 65 74 29 20 | 69 6e 74 6f 20 73 63 6f |ng(get) |into sco|
|000002d0| 72 65 0d 73 65 74 20 74 | 68 65 20 74 65 78 74 20 |re.set t|he text |
|000002e0| 6f 66 20 63 61 73 74 20 | 22 73 63 6f 72 65 22 20 |of cast |"score" |
|000002f0| 3d 20 73 63 6f 72 65 0d | 0d 2d 2d 96 94 81 41 8f |= score.|.--...A.|
|00000300| 89 8a fa 92 6c 82 c9 96 | df 82 b5 82 c4 82 a8 82 |....l...|........|
|00000310| ad 0d 70 75 74 20 30 20 | 69 6e 74 6f 20 70 75 73 |..put 0 |into pus|
|00000320| 68 74 0d 70 75 74 20 22 | 22 20 69 6e 74 6f 20 70 |ht.put "|" into p|
|00000330| 75 73 68 70 0d 70 75 74 | 20 30 20 69 6e 74 6f 20 |ushp.put| 0 into |
|00000340| 68 61 6c 66 0d 0d 0d 71 | 75 69 74 0d 2d 2d 8d b6 |half...q|uit.--..|
|00000350| 82 aa 90 b3 89 f0 0d 67 | 6c 6f 62 61 6c 20 6c 65 |.......g|lobal le|
|00000360| 76 65 6c 0d 0d 6a 75 64 | 67 65 28 41 31 32 2c 22 |vel..jud|ge(A12,"|
|00000370| 6c 65 66 74 22 2c 22 65 | 31 22 29 0d 0d 0d 0d 0d |left","e|1").....|
|00000380| 0d 67 6c 6f 62 61 6c 20 | 70 6c 61 79 65 72 2c 72 |.global |player,r|
|00000390| 65 73 74 61 72 74 2c 68 | 61 6c 66 2c 62 79 65 0d |estart,h|alf,bye.|
|000003a0| 0d 70 75 74 20 70 6c 61 | 79 65 72 20 69 6e 74 6f |.put pla|yer into|
|000003b0| 20 70 6c 79 0d 70 75 74 | 20 73 74 72 69 6e 67 28 | ply.put| string(|
|000003c0| 70 6c 79 29 20 69 6e 74 | 6f 20 70 6c 61 79 65 72 |ply) int|o player|
|000003d0| 0d 73 65 74 20 74 68 65 | 20 74 65 78 74 20 6f 66 |.set the| text of|
|000003e0| 20 63 61 73 74 20 41 34 | 34 20 3d 20 70 6c 61 79 | cast A4|4 = play|
|000003f0| 65 72 0d 0d 69 66 20 72 | 65 73 74 61 72 74 20 3c |er..if r|estart <|
|00000400| 3e 20 31 20 74 68 65 6e | 20 67 6f 20 74 68 65 20 |> 1 then| go the |
|00000410| 66 72 61 6d 65 0d 0d 69 | 66 20 62 79 65 20 3d 20 |frame..i|f bye = |
|00000420| 31 20 74 68 65 6e 0d 20 | 20 20 20 0d 20 20 20 20 |1 then. |   .    |
|00000430| 70 75 70 70 65 74 73 6f | 75 6e 64 20 22 62 79 65 |puppetso|und "bye|
|00000440| 62 79 65 22 0d 20 20 20 | 20 67 6f 20 74 6f 20 22 |bye".   | go to "|
|00000450| 67 71 22 0d 20 20 20 20 | 0d 65 6e 64 20 69 66 0d |gq".    |.end if.|
|00000460| 0d 69 66 20 28 72 65 73 | 74 61 72 74 20 3d 20 31 |.if (res|tart = 1|
|00000470| 29 20 61 6e 64 20 28 68 | 61 6c 66 20 3d 20 30 29 |) and (h|alf = 0)|
|00000480| 20 74 68 65 6e 20 67 6f | 20 74 6f 20 22 31 22 0d | then go| to "1".|
|00000490| 69 66 20 28 72 65 73 74 | 61 72 74 20 3d 20 31 29 |if (rest|art = 1)|
|000004a0| 20 61 6e 64 20 28 68 61 | 6c 66 20 3d 20 31 29 20 | and (ha|lf = 1) |
|000004b0| 74 68 65 6e 20 67 6f 20 | 74 6f 20 22 34 22 0d 0d |then go |to "4"..|
|000004c0| 0d 73 65 74 20 74 68 65 | 20 74 79 70 65 20 6f 66 |.set the| type of|
|000004d0| 20 73 70 72 69 74 65 20 | 38 20 3d 20 31 36 0d 73 | sprite |8 = 16.s|
|000004e0| 65 74 20 74 68 65 20 6d | 6f 76 69 65 72 61 74 65 |et the m|ovierate|
|000004f0| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3d 20 31 | of spri|te 8 = 1|
|00000500| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 74 2c 70 75 |.global |pusht,pu|
|00000510| 73 68 70 0d 73 65 74 20 | 74 68 65 20 74 79 70 65 |shp.set |the type|
|00000520| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3d 20 31 | of spri|te 8 = 1|
|00000530| 36 0d 73 65 74 20 74 68 | 65 20 6d 6f 76 69 65 72 |6.set th|e movier|
|00000540| 61 74 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ate of s|prite 8 |
|00000550| 3d 20 31 0d 0d 69 66 20 | 74 68 65 20 6d 6f 76 69 |= 1..if |the movi|
|00000560| 65 74 69 6d 65 20 6f 66 | 20 73 70 72 69 74 65 20 |etime of| sprite |
|00000570| 38 20 3c 20 74 68 65 20 | 64 75 72 61 74 69 6f 6e |8 < the |duration|
|00000580| 20 6f 66 20 63 61 73 74 | 20 42 31 31 20 74 68 65 | of cast| B11 the|
|00000590| 6e 0d 20 20 20 20 67 6f | 20 74 68 65 20 66 72 61 |n.    go| the fra|
|000005a0| 6d 65 0d 65 6c 73 65 0d | 20 20 20 20 67 6f 20 74 |me.else.|    go t|
|000005b0| 6f 20 22 72 6f 6f 64 61 | 22 0d 65 6e 64 20 69 66 |o "rooda|".end if|
|000005c0| 0d 0d 0d 70 75 74 20 30 | 20 69 6e 74 6f 20 70 75 |...put 0| into pu|
|000005d0| 73 68 74 0d 70 75 74 20 | 22 22 20 69 6e 74 6f 20 |sht.put |"" into |
|000005e0| 70 75 73 68 70 0d 67 6c | 6f 62 61 6c 20 73 63 6f |pushp.gl|obal sco|
|000005f0| 72 65 0d 73 65 74 20 74 | 68 65 20 74 65 78 74 20 |re.set t|he text |
|00000600| 6f 66 20 63 61 73 74 20 | 22 73 63 6f 72 65 22 20 |of cast |"score" |
|00000610| 3d 20 73 74 72 69 6e 67 | 28 73 63 6f 72 65 29 0d |= string|(score).|
|00000620| 2d 2d 89 45 82 aa 90 b3 | 89 f0 0d 6a 75 64 67 65 |--.E....|...judge|
|00000630| 28 41 31 34 2c 22 72 69 | 67 68 74 22 2c 22 65 32 |(A14,"ri|ght","e2|
|00000640| 22 29 73 65 74 20 74 68 | 65 20 74 79 70 65 20 6f |")set th|e type o|
|00000650| 66 20 73 70 72 69 74 65 | 20 38 20 3d 20 31 36 0d |f sprite| 8 = 16.|
|00000660| 73 65 74 20 74 68 65 20 | 6d 6f 76 69 65 72 61 74 |set the |movierat|
|00000670| 65 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 3d 20 |e of spr|ite 8 = |
|00000680| 31 0d 0d 69 66 20 74 68 | 65 20 6d 6f 76 69 65 74 |1..if th|e moviet|
|00000690| 69 6d 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ime of s|prite 8 |
|000006a0| 3c 3e 20 74 68 65 20 64 | 75 72 61 74 69 6f 6e 20 |<> the d|uration |
|000006b0| 6f 66 20 63 61 73 74 20 | 41 31 35 20 74 68 65 6e |of cast |A15 then|
|000006c0| 20 67 6f 20 74 68 65 20 | 66 72 61 6d 65 0d 2d 2d | go the |frame.--|
|000006d0| 8d b6 82 aa 90 b3 89 f0 | 0d 6a 75 64 67 65 28 41 |........|.judge(A|
|000006e0| 31 33 2c 22 6c 65 66 74 | 22 2c 22 65 31 22 29 0d |13,"left|","e1").|
|000006f0| 0d 67 6c 6f 62 61 6c 20 | 68 61 6c 66 2c 70 6c 61 |.global |half,pla|
|00000700| 79 65 72 2c 72 65 73 74 | 61 72 74 2c 62 79 65 0d |yer,rest|art,bye.|
|00000710| 0d 70 75 74 20 30 20 69 | 6e 74 6f 20 62 79 65 0d |.put 0 i|nto bye.|
|00000720| 73 65 74 20 74 68 65 20 | 74 79 70 65 20 6f 66 20 |set the |type of |
|00000730| 73 70 72 69 74 65 20 38 | 20 3d 20 31 36 0d 73 65 |sprite 8| = 16.se|
|00000740| 74 20 74 68 65 20 6d 6f | 76 69 65 72 61 74 65 20 |t the mo|vierate |
|00000750| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3d 20 31 0d |of sprit|e 8 = 1.|
|00000760| 0d 69 66 20 74 68 65 20 | 6d 6f 76 69 65 74 69 6d |.if the |movietim|
|00000770| 65 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 3c 20 |e of spr|ite 8 < |
|00000780| 74 68 65 20 64 75 72 61 | 74 69 6f 6e 20 6f 66 20 |the dura|tion of |
|00000790| 63 61 73 74 20 42 32 35 | 20 74 68 65 6e 0d 20 20 |cast B25| then.  |
|000007a0| 20 20 67 6f 20 74 68 65 | 20 66 72 61 6d 65 0d 65 |  go the| frame.e|
|000007b0| 6c 73 65 0d 20 20 20 20 | 70 75 74 20 30 20 69 6e |lse.    |put 0 in|
|000007c0| 74 6f 20 72 65 73 74 61 | 72 74 0d 20 20 20 20 70 |to resta|rt.    p|
|000007d0| 75 74 20 69 6e 74 65 67 | 65 72 28 70 6c 61 79 65 |ut integ|er(playe|
|000007e0| 72 20 2d 20 31 29 20 69 | 6e 74 6f 20 70 6c 61 79 |r - 1) i|nto play|
|000007f0| 65 72 0d 20 20 20 20 70 | 75 74 20 22 41 2e 44 2e |er.    p|ut "A.D.|
|00000800| 33 30 30 31 22 20 69 6e | 74 6f 20 6d 73 0d 20 20 |3001" in|to ms.  |
|00000810| 20 20 70 75 74 20 73 74 | 72 69 6e 67 28 6d 73 29 |  put st|ring(ms)|
|00000820| 20 69 6e 74 6f 20 6d 73 | 67 0d 20 20 20 20 73 65 | into ms|g.    se|
|00000830| 74 20 74 68 65 20 74 65 | 78 74 20 6f 66 20 63 61 |t the te|xt of ca|
|00000840| 73 74 20 41 35 37 20 3d | 20 6d 73 67 0d 20 20 20 |st A57 =| msg.   |
|00000850| 20 69 66 20 70 6c 61 79 | 65 72 20 3e 20 30 20 74 | if play|er > 0 t|
|00000860| 68 65 6e 20 0d 20 20 20 | 20 20 20 20 20 67 6f 20 |hen .   |     go |
|00000870| 74 6f 20 22 72 65 73 74 | 61 72 74 22 0d 20 20 20 |to "rest|art".   |
|00000880| 20 65 6c 73 65 0d 20 20 | 20 20 20 20 20 20 67 6f | else.  |      go|
|00000890| 20 74 6f 20 22 67 61 6d | 65 6f 76 65 72 22 0d 20 | to "gam|eover". |
|000008a0| 20 20 20 65 6e 64 20 69 | 66 0d 65 6e 64 20 69 66 |   end i|f.end if|
|000008b0| 0d 0d 0d 0d 0d 0d 67 6c | 6f 62 61 6c 20 4d 56 63 |......gl|obal MVc|
|000008c0| 6f 75 6e 74 2c 4b 0d 0d | 75 6e 6c 6f 61 64 0d 0d |ount,K..|unload..|
|000008d0| 70 75 74 20 69 6e 74 65 | 67 65 72 28 4d 56 63 6f |put inte|ger(MVco|
|000008e0| 75 6e 74 20 2b 20 31 29 | 20 69 6e 74 6f 20 4d 56 |unt + 1)| into MV|
|000008f0| 63 6f 75 6e 74 0d 70 75 | 74 20 31 20 69 6e 74 6f |count.pu|t 1 into|
|00000900| 20 4b 0d 0d 67 6f 20 74 | 6f 20 22 73 65 63 6f 6e | K..go t|o "secon|
|00000910| 64 22 20 6f 66 20 6d 6f | 76 69 65 20 22 6d 61 69 |d" of mo|vie "mai|
|00000920| 6e 22 0d 67 6c 6f 62 61 | 6c 20 70 75 73 68 74 2c |n".globa|l pusht,|
|00000930| 70 75 73 68 70 2c 68 61 | 6c 66 0d 73 65 74 20 74 |pushp,ha|lf.set t|
|00000940| 68 65 20 74 79 70 65 20 | 6f 66 20 73 70 72 69 74 |he type |of sprit|
|00000950| 65 20 38 20 3d 20 31 36 | 0d 73 65 74 20 74 68 65 |e 8 = 16|.set the|
|00000960| 20 6d 6f 76 69 65 72 61 | 74 65 20 6f 66 20 73 70 | moviera|te of sp|
|00000970| 72 69 74 65 20 38 20 3d | 20 31 0d 0d 69 66 20 74 |rite 8 =| 1..if t|
|00000980| 68 65 20 6d 6f 76 69 65 | 74 69 6d 65 20 6f 66 20 |he movie|time of |
|00000990| 73 70 72 69 74 65 20 38 | 20 3c 20 74 68 65 20 64 |sprite 8| < the d|
|000009a0| 75 72 61 74 69 6f 6e 20 | 6f 66 20 63 61 73 74 20 |uration |of cast |
|000009b0| 42 31 33 20 74 68 65 6e | 0d 20 20 20 20 67 6f 20 |B13 then|.    go |
|000009c0| 74 68 65 20 66 72 61 6d | 65 0d 65 6c 73 65 0d 20 |the fram|e.else. |
|000009d0| 20 20 20 67 6f 20 74 6f | 20 22 72 6f 6f 64 61 22 |   go to| "rooda"|
|000009e0| 0d 65 6e 64 20 69 66 0d | 0d 0d 70 75 74 20 30 20 |.end if.|..put 0 |
|000009f0| 69 6e 74 6f 20 70 75 73 | 68 74 0d 70 75 74 20 22 |into pus|ht.put "|
|00000a00| 22 20 69 6e 74 6f 20 70 | 75 73 68 70 0d 70 75 74 |" into p|ushp.put|
|00000a10| 20 31 20 69 6e 74 6f 20 | 68 61 6c 66 0d 2d 2d 63 | 1 into |half.--c|
|00000a20| 6c 69 63 6b 82 aa 90 b3 | 89 f0 0d 6a 75 64 67 65 |lick....|...judge|
|00000a30| 28 41 31 36 2c 22 61 6c | 6c 22 2c 22 65 33 22 29 |(A16,"al|l","e3")|
|00000a40| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 70 0d 0d 69 |.global |pushp..i|
|00000a50| 66 20 28 74 68 65 20 6d | 6f 76 69 65 74 69 6d 65 |f (the m|ovietime|
|00000a60| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3c 20 74 | of spri|te 8 < t|
|00000a70| 68 65 20 64 75 72 61 74 | 69 6f 6e 20 6f 66 20 63 |he durat|ion of c|
|00000a80| 61 73 74 20 41 31 36 29 | 20 61 6e 64 20 28 70 75 |ast A16)| and (pu|
|00000a90| 73 68 70 20 3d 20 22 22 | 29 20 74 68 65 6e 0d 20 |shp = ""|) then. |
|00000aa0| 20 20 20 67 6f 20 74 6f | 20 66 72 61 6d 65 20 32 |   go to| frame 2|
|00000ab0| 39 0d 65 6e 64 20 69 66 | 0d 0d 0d 0d 67 6c 6f 62 |9.end if|....glob|
|00000ac0| 61 6c 20 70 75 73 68 74 | 2c 70 75 73 68 70 2c 73 |al pusht|,pushp,s|
|00000ad0| 63 6f 72 65 2c 68 61 6c | 66 2c 6c 65 76 65 6c 0d |core,hal|f,level.|
|00000ae0| 0d 69 66 20 68 61 6c 66 | 20 3d 20 30 20 74 68 65 |.if half| = 0 the|
|00000af0| 6e 0d 20 20 20 20 69 66 | 20 6c 65 76 65 6c 20 3d |n.    if| level =|
|00000b00| 20 22 65 61 73 79 22 20 | 74 68 65 6e 20 70 75 74 | "easy" |then put|
|00000b10| 20 69 6e 74 65 67 65 72 | 28 31 30 30 30 20 2b 20 | integer|(1000 + |
|00000b20| 73 63 6f 72 65 29 20 69 | 6e 74 6f 20 67 65 74 0d |score) i|nto get.|
|00000b30| 20 20 20 20 69 66 20 6c | 65 76 65 6c 20 3d 20 22 |    if l|evel = "|
|00000b40| 6e 6f 72 6d 61 6c 22 20 | 74 68 65 6e 20 70 75 74 |normal" |then put|
|00000b50| 20 69 6e 74 65 67 65 72 | 28 31 35 30 30 20 2b 20 | integer|(1500 + |
|00000b60| 73 63 6f 72 65 29 20 69 | 6e 74 6f 20 67 65 74 0d |score) i|nto get.|
|00000b70| 20 20 20 20 69 66 20 6c | 65 76 65 6c 20 3d 20 22 |    if l|evel = "|
|00000b80| 68 61 72 64 22 20 74 68 | 65 6e 20 70 75 74 20 69 |hard" th|en put i|
|00000b90| 6e 74 65 67 65 72 28 32 | 30 30 30 20 2b 20 73 63 |nteger(2|000 + sc|
|00000ba0| 6f 72 65 29 20 69 6e 74 | 6f 20 67 65 74 0d 20 20 |ore) int|o get.  |
|00000bb0| 20 20 65 6c 73 65 20 6e | 6f 74 68 69 6e 67 0d 65 |  else n|othing.e|
|00000bc0| 6c 73 65 0d 20 20 20 20 | 69 66 20 6c 65 76 65 6c |lse.    |if level|
|00000bd0| 20 3d 20 22 65 61 73 79 | 22 20 74 68 65 6e 20 70 | = "easy|" then p|
|00000be0| 75 74 20 69 6e 74 65 67 | 65 72 28 35 30 30 20 2b |ut integ|er(500 +|
|00000bf0| 20 73 63 6f 72 65 29 20 | 69 6e 74 6f 20 67 65 74 | score) |into get|
|00000c00| 0d 20 20 20 20 69 66 20 | 6c 65 76 65 6c 20 3d 20 |.    if |level = |
|00000c10| 22 6e 6f 72 6d 61 6c 22 | 20 74 68 65 6e 20 70 75 |"normal"| then pu|
|00000c20| 74 20 69 6e 74 65 67 65 | 72 28 31 30 30 30 20 2b |t intege|r(1000 +|
|00000c30| 20 73 63 6f 72 65 29 20 | 69 6e 74 6f 20 67 65 74 | score) |into get|
|00000c40| 0d 20 20 20 20 69 66 20 | 6c 65 76 65 6c 20 3d 20 |.    if |level = |
|00000c50| 22 68 61 72 64 22 20 74 | 68 65 6e 20 70 75 74 20 |"hard" t|hen put |
|00000c60| 69 6e 74 65 67 65 72 28 | 31 35 30 30 20 2b 20 73 |integer(|1500 + s|
|00000c70| 63 6f 72 65 29 20 69 6e | 74 6f 20 67 65 74 0d 65 |core) in|to get.e|
|00000c80| 6e 64 20 69 66 0d 0d 70 | 75 74 20 73 74 72 69 6e |nd if..p|ut strin|
|00000c90| 67 28 67 65 74 29 20 69 | 6e 74 6f 20 73 63 6f 72 |g(get) i|nto scor|
|00000ca0| 65 0d 73 65 74 20 74 68 | 65 20 74 65 78 74 20 6f |e.set th|e text o|
|00000cb0| 66 20 63 61 73 74 20 22 | 73 63 6f 72 65 22 20 3d |f cast "|score" =|
|00000cc0| 20 73 63 6f 72 65 0d 0d | 70 75 74 20 30 20 69 6e | score..|put 0 in|
|00000cd0| 74 6f 20 70 75 73 68 74 | 0d 70 75 74 20 22 22 20 |to pusht|.put "" |
|00000ce0| 69 6e 74 6f 20 70 75 73 | 68 70 0d 0d 73 65 74 20 |into pus|hp..set |
|00000cf0| 74 68 65 20 74 79 70 65 | 20 6f 66 20 73 70 72 69 |the type| of spri|
|00000d00| 74 65 20 38 20 3d 20 31 | 36 0d 73 65 74 20 74 68 |te 8 = 1|6.set th|
|00000d10| 65 20 6d 6f 76 69 65 72 | 61 74 65 20 6f 66 20 73 |e movier|ate of s|
|00000d20| 70 72 69 74 65 20 38 20 | 3d 20 31 0d 0d 69 66 20 |prite 8 |= 1..if |
|00000d30| 74 68 65 20 6d 6f 76 69 | 65 74 69 6d 65 20 6f 66 |the movi|etime of|
|00000d40| 20 73 70 72 69 74 65 20 | 38 20 3c 3e 20 74 68 65 | sprite |8 <> the|
|00000d50| 20 64 75 72 61 74 69 6f | 6e 20 6f 66 20 63 61 73 | duratio|n of cas|
|00000d60| 74 20 41 33 33 20 74 68 | 65 6e 20 67 6f 20 74 68 |t A33 th|en go th|
|00000d70| 65 20 66 72 61 6d 65 0d | 67 6c 6f 62 61 6c 20 70 |e frame.|global p|
|00000d80| 75 73 68 74 2c 70 75 73 | 68 70 2c 73 63 6f 72 65 |usht,pus|hp,score|
|00000d90| 2c 6c 65 76 65 6c 0d 0d | 69 66 20 6c 65 76 65 6c |,level..|if level|
|00000da0| 20 3d 20 22 65 61 73 79 | 22 20 74 68 65 6e 20 70 | = "easy|" then p|
|00000db0| 75 74 20 69 6e 74 65 67 | 65 72 28 35 30 30 20 2b |ut integ|er(500 +|
|00000dc0| 20 73 63 6f 72 65 29 20 | 69 6e 74 6f 20 67 65 74 | score) |into get|
|00000dd0| 0d 69 66 20 6c 65 76 65 | 6c 20 3d 20 22 6e 6f 72 |.if leve|l = "nor|
|00000de0| 6d 61 6c 22 20 74 68 65 | 6e 20 70 75 74 20 69 6e |mal" the|n put in|
|00000df0| 74 65 67 65 72 28 31 30 | 30 30 20 2b 20 73 63 6f |teger(10|00 + sco|
|00000e00| 72 65 29 20 69 6e 74 6f | 20 67 65 74 0d 69 66 20 |re) into| get.if |
|00000e10| 6c 65 76 65 6c 20 3d 20 | 22 68 61 72 64 22 20 74 |level = |"hard" t|
|00000e20| 68 65 6e 20 70 75 74 20 | 69 6e 74 65 67 65 72 28 |hen put |integer(|
|00000e30| 31 35 30 30 20 2b 20 73 | 63 6f 72 65 29 20 69 6e |1500 + s|core) in|
|00000e40| 74 6f 20 67 65 74 0d 0d | 70 75 74 20 73 74 72 69 |to get..|put stri|
|00000e50| 6e 67 28 67 65 74 29 20 | 69 6e 74 6f 20 73 63 6f |ng(get) |into sco|
|00000e60| 72 65 0d 73 65 74 20 74 | 68 65 20 74 65 78 74 20 |re.set t|he text |
|00000e70| 6f 66 20 63 61 73 74 20 | 22 73 63 6f 72 65 22 20 |of cast |"score" |
|00000e80| 3d 20 73 63 6f 72 65 0d | 0d 70 75 74 20 30 20 69 |= score.|.put 0 i|
|00000e90| 6e 74 6f 20 70 75 73 68 | 74 0d 70 75 74 20 22 22 |nto push|t.put ""|
|00000ea0| 20 69 6e 74 6f 20 70 75 | 73 68 70 0d 0d 0d 0d 67 | into pu|shp....g|
|00000eb0| 6c 6f 62 61 6c 20 70 75 | 73 68 70 0d 0d 69 66 20 |lobal pu|shp..if |
|00000ec0| 28 74 68 65 20 6d 6f 76 | 69 65 74 69 6d 65 20 6f |(the mov|ietime o|
|00000ed0| 66 20 73 70 72 69 74 65 | 20 38 20 3c 20 74 68 65 |f sprite| 8 < the|
|00000ee0| 20 64 75 72 61 74 69 6f | 6e 20 6f 66 20 63 61 73 | duratio|n of cas|
|00000ef0| 74 20 41 31 37 29 20 61 | 6e 64 20 28 70 75 73 68 |t A17) a|nd (push|
|00000f00| 70 20 3d 20 22 22 29 20 | 74 68 65 6e 0d 20 20 20 |p = "") |then.   |
|00000f10| 20 67 6f 20 74 6f 20 66 | 72 61 6d 65 20 33 34 0d | go to f|rame 34.|
|00000f20| 65 6e 64 20 69 66 0d 0d | 2d 2d 8d b6 82 aa 90 b3 |end if..|--......|
|00000f30| 89 f0 0d 6a 75 64 67 65 | 28 41 31 37 2c 22 6c 65 |...judge|(A17,"le|
|00000f40| 66 74 22 2c 22 65 34 22 | 29 67 6c 6f 62 61 6c 20 |ft","e4"|)global |
|00000f50| 70 75 73 68 70 0d 0d 69 | 66 20 28 74 68 65 20 6d |pushp..i|f (the m|
|00000f60| 6f 76 69 65 74 69 6d 65 | 20 6f 66 20 73 70 72 69 |ovietime| of spri|
|00000f70| 74 65 20 38 20 3c 20 74 | 68 65 20 64 75 72 61 74 |te 8 < t|he durat|
|00000f80| 69 6f 6e 20 6f 66 20 63 | 61 73 74 20 41 31 38 29 |ion of c|ast A18)|
|00000f90| 20 61 6e 64 20 28 70 75 | 73 68 70 20 3d 20 22 22 | and (pu|shp = ""|
|00000fa0| 29 20 74 68 65 6e 0d 20 | 20 20 20 67 6f 20 74 6f |) then. |   go to|
|00000fb0| 20 66 72 61 6d 65 20 33 | 39 0d 65 6e 64 20 69 66 | frame 3|9.end if|
|00000fc0| 0d 0d 2d 2d 89 45 82 aa | 90 b3 89 f0 0d 6a 75 64 |..--.E..|.....jud|
|00000fd0| 67 65 28 41 31 38 2c 22 | 72 69 67 68 74 22 2c 22 |ge(A18,"|right","|
|00000fe0| 65 35 22 29 67 6c 6f 62 | 61 6c 20 70 75 73 68 74 |e5")glob|al pusht|
|00000ff0| 2c 70 75 73 68 70 2c 68 | 61 6c 66 0d 73 65 74 20 |,pushp,h|alf.set |
|00001000| 74 68 65 20 74 79 70 65 | 20 6f 66 20 73 70 72 69 |the type| of spri|
|00001010| 74 65 20 38 20 3d 20 31 | 36 0d 73 65 74 20 74 68 |te 8 = 1|6.set th|
|00001020| 65 20 6d 6f 76 69 65 72 | 61 74 65 20 6f 66 20 73 |e movier|ate of s|
|00001030| 70 72 69 74 65 20 38 20 | 3d 20 31 0d 0d 69 66 20 |prite 8 |= 1..if |
|00001040| 74 68 65 20 6d 6f 76 69 | 65 74 69 6d 65 20 6f 66 |the movi|etime of|
|00001050| 20 73 70 72 69 74 65 20 | 38 20 3c 20 74 68 65 20 | sprite |8 < the |
|00001060| 64 75 72 61 74 69 6f 6e | 20 6f 66 20 63 61 73 74 |duration| of cast|
|00001070| 20 42 31 34 20 74 68 65 | 6e 0d 20 20 20 20 67 6f | B14 the|n.    go|
|00001080| 20 74 68 65 20 66 72 61 | 6d 65 0d 65 6c 73 65 0d | the fra|me.else.|
|00001090| 20 20 20 20 67 6f 20 74 | 6f 20 22 72 6f 6f 64 61 |    go t|o "rooda|
|000010a0| 22 0d 65 6e 64 20 69 66 | 0d 0d 70 75 74 20 30 20 |".end if|..put 0 |
|000010b0| 69 6e 74 6f 20 70 75 73 | 68 74 0d 70 75 74 20 22 |into pus|ht.put "|
|000010c0| 22 20 69 6e 74 6f 20 70 | 75 73 68 70 0d 70 75 74 |" into p|ushp.put|
|000010d0| 20 31 20 69 6e 74 6f 20 | 68 61 6c 66 0d 0d 67 6c | 1 into |half..gl|
|000010e0| 6f 62 61 6c 20 70 75 73 | 68 74 2c 70 75 73 68 70 |obal pus|ht,pushp|
|000010f0| 2c 68 61 6c 66 0d 73 65 | 74 20 74 68 65 20 74 79 |,half.se|t the ty|
|00001100| 70 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3d |pe of sp|rite 8 =|
|00001110| 20 31 36 0d 73 65 74 20 | 74 68 65 20 6d 6f 76 69 | 16.set |the movi|
|00001120| 65 72 61 74 65 20 6f 66 | 20 73 70 72 69 74 65 20 |erate of| sprite |
|00001130| 38 20 3d 20 31 0d 0d 69 | 66 20 74 68 65 20 6d 6f |8 = 1..i|f the mo|
|00001140| 76 69 65 74 69 6d 65 20 | 6f 66 20 73 70 72 69 74 |vietime |of sprit|
|00001150| 65 20 38 20 3c 20 74 68 | 65 20 64 75 72 61 74 69 |e 8 < th|e durati|
|00001160| 6f 6e 20 6f 66 20 63 61 | 73 74 20 42 31 35 20 74 |on of ca|st B15 t|
|00001170| 68 65 6e 0d 20 20 20 20 | 67 6f 20 74 68 65 20 66 |hen.    |go the f|
|00001180| 72 61 6d 65 0d 65 6c 73 | 65 0d 20 20 20 20 67 6f |rame.els|e.    go|
|00001190| 20 74 6f 20 22 72 6f 6f | 64 61 22 0d 65 6e 64 20 | to "roo|da".end |
|000011a0| 69 66 0d 0d 70 75 74 20 | 30 20 69 6e 74 6f 20 70 |if..put |0 into p|
|000011b0| 75 73 68 74 0d 70 75 74 | 20 22 22 20 69 6e 74 6f |usht.put| "" into|
|000011c0| 20 70 75 73 68 70 0d 70 | 75 74 20 31 20 69 6e 74 | pushp.p|ut 1 int|
|000011d0| 6f 20 68 61 6c 66 0d 0d | 67 6c 6f 62 61 6c 20 70 |o half..|global p|
|000011e0| 75 73 68 74 2c 70 75 73 | 68 70 2c 68 61 6c 66 0d |usht,pus|hp,half.|
|000011f0| 73 65 74 20 74 68 65 20 | 74 79 70 65 20 6f 66 20 |set the |type of |
|00001200| 73 70 72 69 74 65 20 38 | 20 3d 20 31 36 0d 73 65 |sprite 8| = 16.se|
|00001210| 74 20 74 68 65 20 6d 6f | 76 69 65 72 61 74 65 20 |t the mo|vierate |
|00001220| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3d 20 31 0d |of sprit|e 8 = 1.|
|00001230| 0d 69 66 20 74 68 65 20 | 6d 6f 76 69 65 74 69 6d |.if the |movietim|
|00001240| 65 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 3c 20 |e of spr|ite 8 < |
|00001250| 74 68 65 20 64 75 72 61 | 74 69 6f 6e 20 6f 66 20 |the dura|tion of |
|00001260| 63 61 73 74 20 42 31 36 | 20 74 68 65 6e 0d 20 20 |cast B16| then.  |
|00001270| 20 20 67 6f 20 74 68 65 | 20 66 72 61 6d 65 0d 65 |  go the| frame.e|
|00001280| 6c 73 65 0d 20 20 20 20 | 67 6f 20 74 6f 20 22 72 |lse.    |go to "r|
|00001290| 6f 6f 64 61 22 0d 65 6e | 64 20 69 66 0d 0d 70 75 |ooda".en|d if..pu|
|000012a0| 74 20 30 20 69 6e 74 6f | 20 70 75 73 68 74 0d 70 |t 0 into| pusht.p|
|000012b0| 75 74 20 22 22 20 69 6e | 74 6f 20 70 75 73 68 70 |ut "" in|to pushp|
|000012c0| 0d 70 75 74 20 31 20 69 | 6e 74 6f 20 68 61 6c 66 |.put 1 i|nto half|
|000012d0| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 74 2c 70 75 |.global |pusht,pu|
|000012e0| 73 68 70 2c 73 63 6f 72 | 65 2c 68 61 6c 66 0d 0d |shp,scor|e,half..|
|000012f0| 73 65 74 20 74 68 65 20 | 74 79 70 65 20 6f 66 20 |set the |type of |
|00001300| 73 70 72 69 74 65 20 38 | 20 3d 20 31 36 0d 73 65 |sprite 8| = 16.se|
|00001310| 74 20 74 68 65 20 6d 6f | 76 69 65 72 61 74 65 20 |t the mo|vierate |
|00001320| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3d 20 31 0d |of sprit|e 8 = 1.|
|00001330| 0d 69 66 20 74 68 65 20 | 6d 6f 76 69 65 74 69 6d |.if the |movietim|
|00001340| 65 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 3c 3e |e of spr|ite 8 <>|
|00001350| 20 74 68 65 20 64 75 72 | 61 74 69 6f 6e 20 6f 66 | the dur|ation of|
|00001360| 20 63 61 73 74 20 41 31 | 31 20 74 68 65 6e 20 67 | cast A1|1 then g|
|00001370| 6f 20 74 68 65 20 66 72 | 61 6d 65 0d 0d 0d 67 6c |o the fr|ame...gl|
|00001380| 6f 62 61 6c 20 70 75 73 | 68 70 0d 0d 69 66 20 28 |obal pus|hp..if (|
|00001390| 74 68 65 20 6d 6f 76 69 | 65 74 69 6d 65 20 6f 66 |the movi|etime of|
|000013a0| 20 73 70 72 69 74 65 20 | 38 20 3c 20 74 68 65 20 | sprite |8 < the |
|000013b0| 64 75 72 61 74 69 6f 6e | 20 6f 66 20 63 61 73 74 |duration| of cast|
|000013c0| 20 41 32 31 29 20 61 6e | 64 20 28 70 75 73 68 70 | A21) an|d (pushp|
|000013d0| 20 3d 20 22 22 29 20 74 | 68 65 6e 0d 20 20 20 20 | = "") t|hen.    |
|000013e0| 67 6f 20 74 6f 20 66 72 | 61 6d 65 20 34 34 0d 65 |go to fr|ame 44.e|
|000013f0| 6e 64 20 69 66 0d 0d 2d | 2d 63 6c 69 63 6b 82 aa |nd if..-|-click..|
|00001400| 90 b3 89 f0 0d 6a 75 64 | 67 65 28 41 32 31 2c 22 |.....jud|ge(A21,"|
|00001410| 61 6c 6c 22 2c 22 65 36 | 22 29 67 6f 20 74 6f 20 |all","e6|")go to |
|00001420| 6d 6f 76 69 65 20 22 67 | 61 6d 65 2e 6f 76 65 72 |movie "g|ame.over|
|00001430| 22 0d 0d 0d 67 6c 6f 62 | 61 6c 20 70 75 73 68 70 |"...glob|al pushp|
|00001440| 0d 0d 69 66 20 28 74 68 | 65 20 6d 6f 76 69 65 74 |..if (th|e moviet|
|00001450| 69 6d 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ime of s|prite 8 |
|00001460| 3c 20 74 68 65 20 64 75 | 72 61 74 69 6f 6e 20 6f |< the du|ration o|
|00001470| 66 20 63 61 73 74 20 41 | 32 32 29 20 61 6e 64 20 |f cast A|22) and |
|00001480| 28 70 75 73 68 70 20 3d | 20 22 22 29 20 74 68 65 |(pushp =| "") the|
|00001490| 6e 0d 20 20 20 20 67 6f | 20 74 6f 20 66 72 61 6d |n.    go| to fram|
|000014a0| 65 20 34 39 0d 65 6e 64 | 20 69 66 0d 0d 2d 2d 63 |e 49.end| if..--c|
|000014b0| 6c 69 63 6b 82 aa 90 b3 | 89 f0 0d 6a 75 64 67 65 |lick....|...judge|
|000014c0| 28 41 32 32 2c 22 61 6c | 6c 22 2c 22 4e 73 6c 63 |(A22,"al|l","Nslc|
|000014d0| 74 22 29 67 6c 6f 62 61 | 6c 20 70 75 73 68 70 0d |t")globa|l pushp.|
|000014e0| 0d 73 65 74 20 74 68 65 | 20 74 79 70 65 20 6f 66 |.set the| type of|
|000014f0| 20 73 70 72 69 74 65 20 | 38 20 3d 20 31 36 0d 73 | sprite |8 = 16.s|
|00001500| 65 74 20 74 68 65 20 6d | 6f 76 69 65 72 61 74 65 |et the m|ovierate|
|00001510| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3d 20 31 | of spri|te 8 = 1|
|00001520| 0d 69 66 20 70 75 73 68 | 70 20 3d 20 22 67 6f 6f |.if push|p = "goo|
|00001530| 64 22 20 74 68 65 6e 20 | 67 6f 20 74 6f 20 66 72 |d" then |go to fr|
|00001540| 61 6d 65 20 35 36 0d 69 | 66 20 70 75 73 68 70 20 |ame 56.i|f pushp |
|00001550| 3d 20 22 73 68 6f 6f 74 | 22 20 74 68 65 6e 20 67 |= "shoot|" then g|
|00001560| 6f 20 74 6f 20 66 72 61 | 6d 65 20 35 38 0d 69 66 |o to fra|me 58.if|
|00001570| 20 70 75 73 68 70 20 3d | 20 22 64 6f 77 6e 22 20 | pushp =| "down" |
|00001580| 74 68 65 6e 20 67 6f 20 | 74 6f 20 66 72 61 6d 65 |then go |to frame|
|00001590| 20 36 30 0d 0d 69 66 20 | 74 68 65 20 6d 6f 76 69 | 60..if |the movi|
|000015a0| 65 74 69 6d 65 20 6f 66 | 20 73 70 72 69 74 65 20 |etime of| sprite |
|000015b0| 38 20 3c 20 74 68 65 20 | 64 75 72 61 74 69 6f 6e |8 < the |duration|
|000015c0| 20 6f 66 20 63 61 73 74 | 20 41 32 35 20 74 68 65 | of cast| A25 the|
|000015d0| 6e 0d 20 20 20 20 67 6f | 20 74 68 65 20 66 72 61 |n.    go| the fra|
|000015e0| 6d 65 0d 65 6c 73 65 0d | 20 20 20 20 67 6f 20 74 |me.else.|    go t|
|000015f0| 6f 20 22 6a 74 73 37 22 | 0d 65 6e 64 20 69 66 0d |o "jts7"|.end if.|
|00001600| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 74 2c 70 75 |.global |pusht,pu|
|00001610| 73 68 70 2c 73 63 6f 72 | 65 2c 6c 65 76 65 6c 0d |shp,scor|e,level.|
|00001620| 0d 69 66 20 6c 65 76 65 | 6c 20 3d 20 22 65 61 73 |.if leve|l = "eas|
|00001630| 79 22 20 74 68 65 6e 20 | 70 75 74 20 69 6e 74 65 |y" then |put inte|
|00001640| 67 65 72 28 35 30 30 20 | 2b 20 73 63 6f 72 65 29 |ger(500 |+ score)|
|00001650| 20 69 6e 74 6f 20 67 65 | 74 0d 69 66 20 6c 65 76 | into ge|t.if lev|
|00001660| 65 6c 20 3d 20 22 6e 6f | 72 6d 61 6c 22 20 74 68 |el = "no|rmal" th|
|00001670| 65 6e 20 70 75 74 20 69 | 6e 74 65 67 65 72 28 31 |en put i|nteger(1|
|00001680| 30 30 30 20 2b 20 73 63 | 6f 72 65 29 20 69 6e 74 |000 + sc|ore) int|
|00001690| 6f 20 67 65 74 0d 69 66 | 20 6c 65 76 65 6c 20 3d |o get.if| level =|
|000016a0| 20 22 68 61 72 64 22 20 | 74 68 65 6e 20 70 75 74 | "hard" |then put|
|000016b0| 20 69 6e 74 65 67 65 72 | 28 31 35 30 30 20 2b 20 | integer|(1500 + |
|000016c0| 73 63 6f 72 65 29 20 69 | 6e 74 6f 20 67 65 74 0d |score) i|nto get.|
|000016d0| 0d 70 75 74 20 73 74 72 | 69 6e 67 28 67 65 74 29 |.put str|ing(get)|
|000016e0| 20 69 6e 74 6f 20 73 63 | 6f 72 65 0d 73 65 74 20 | into sc|ore.set |
|000016f0| 74 68 65 20 74 65 78 74 | 20 6f 66 20 63 61 73 74 |the text| of cast|
|00001700| 20 22 73 63 6f 72 65 22 | 20 3d 20 73 63 6f 72 65 | "score"| = score|
|00001710| 0d 0d 70 75 74 20 30 20 | 69 6e 74 6f 20 70 75 73 |..put 0 |into pus|
|00001720| 68 74 0d 70 75 74 20 22 | 22 20 69 6e 74 6f 20 70 |ht.put "|" into p|
|00001730| 75 73 68 70 0d 0d 0d 69 | 66 20 74 68 65 20 6d 6f |ushp...i|f the mo|
|00001740| 76 69 65 74 69 6d 65 20 | 6f 66 20 73 70 72 69 74 |vietime |of sprit|
|00001750| 65 20 38 20 3c 20 74 68 | 65 20 64 75 72 61 74 69 |e 8 < th|e durati|
|00001760| 6f 6e 20 6f 66 20 63 61 | 73 74 20 41 32 35 20 74 |on of ca|st A25 t|
|00001770| 68 65 6e 20 0d 20 20 20 | 20 67 6f 20 74 6f 20 66 |hen .   | go to f|
|00001780| 72 61 6d 65 20 35 36 0d | 65 6c 73 65 0d 20 20 20 |rame 56.|else.   |
|00001790| 20 67 6f 20 74 6f 20 22 | 6a 74 73 37 22 0d 65 6e | go to "|jts7".en|
|000017a0| 64 20 69 66 0d 0d 69 66 | 20 74 68 65 20 6d 6f 76 |d if..if| the mov|
|000017b0| 69 65 74 69 6d 65 20 6f | 66 20 73 70 72 69 74 65 |ietime o|f sprite|
|000017c0| 20 38 20 3c 20 74 68 65 | 20 64 75 72 61 74 69 6f | 8 < the| duratio|
|000017d0| 6e 20 6f 66 20 63 61 73 | 74 20 41 32 35 20 74 68 |n of cas|t A25 th|
|000017e0| 65 6e 20 0d 20 20 20 20 | 67 6f 20 74 6f 20 66 72 |en .    |go to fr|
|000017f0| 61 6d 65 20 35 38 0d 65 | 6c 73 65 0d 20 20 20 20 |ame 58.e|lse.    |
|00001800| 67 6f 20 74 6f 20 22 6a | 74 73 37 22 0d 65 6e 64 |go to "j|ts7".end|
|00001810| 20 69 66 0d 69 66 20 74 | 68 65 20 6d 6f 76 69 65 | if.if t|he movie|
|00001820| 74 69 6d 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |time of |sprite 8|
|00001830| 20 3c 20 74 68 65 20 64 | 75 72 61 74 69 6f 6e 20 | < the d|uration |
|00001840| 6f 66 20 63 61 73 74 20 | 41 32 35 20 74 68 65 6e |of cast |A25 then|
|00001850| 20 0d 20 20 20 20 67 6f | 20 74 6f 20 66 72 61 6d | .    go| to fram|
|00001860| 65 20 36 30 0d 65 6c 73 | 65 0d 20 20 20 20 67 6f |e 60.els|e.    go|
|00001870| 20 74 6f 20 22 6a 74 73 | 37 22 0d 65 6e 64 20 69 | to "jts|7".end i|
|00001880| 66 0d 67 6c 6f 62 61 6c | 20 70 75 73 68 70 0d 0d |f.global| pushp..|
|00001890| 69 66 20 70 75 73 68 70 | 20 3d 20 22 22 20 74 68 |if pushp| = "" th|
|000018a0| 65 6e 20 67 6f 20 74 6f | 20 22 4e 73 6c 63 74 22 |en go to| "Nslct"|
|000018b0| 0d 69 66 20 70 75 73 68 | 70 20 3d 20 22 73 68 6f |.if push|p = "sho|
|000018c0| 6f 74 22 20 74 68 65 6e | 20 67 6f 20 74 6f 20 22 |ot" then| go to "|
|000018d0| 73 68 6f 6f 74 22 0d 69 | 66 20 70 75 73 68 70 20 |shoot".i|f pushp |
|000018e0| 3d 20 22 64 6f 77 6e 22 | 20 74 68 65 6e 20 67 6f |= "down"| then go|
|000018f0| 20 74 6f 20 22 64 6f 77 | 6e 22 0d 0d 67 6c 6f 62 | to "dow|n"..glob|
|00001900| 61 6c 20 70 75 73 68 70 | 0d 0d 69 66 20 28 74 68 |al pushp|..if (th|
|00001910| 65 20 6d 6f 76 69 65 74 | 69 6d 65 20 6f 66 20 73 |e moviet|ime of s|
|00001920| 70 72 69 74 65 20 38 20 | 3c 20 74 68 65 20 64 75 |prite 8 |< the du|
|00001930| 72 61 74 69 6f 6e 20 6f | 66 20 63 61 73 74 20 41 |ration o|f cast A|
|00001940| 31 33 29 20 61 6e 64 20 | 28 70 75 73 68 70 20 3d |13) and |(pushp =|
|00001950| 20 22 22 29 20 74 68 65 | 6e 0d 20 20 20 20 67 6f | "") the|n.    go|
|00001960| 20 74 6f 20 66 72 61 6d | 65 20 31 38 0d 65 6e 64 | to fram|e 18.end|
|00001970| 20 69 66 0d 0d 0d 0d 67 | 6c 6f 62 61 6c 20 70 75 | if....g|lobal pu|
|00001980| 73 68 70 0d 0d 73 65 74 | 20 74 68 65 20 74 79 70 |shp..set| the typ|
|00001990| 65 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 3d 20 |e of spr|ite 8 = |
|000019a0| 31 36 0d 73 65 74 20 74 | 68 65 20 6d 6f 76 69 65 |16.set t|he movie|
|000019b0| 72 61 74 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |rate of |sprite 8|
|000019c0| 20 3d 20 31 0d 69 66 20 | 70 75 73 68 70 20 3d 20 | = 1.if |pushp = |
|000019d0| 22 67 6f 6f 64 22 20 74 | 68 65 6e 20 67 6f 20 74 |"good" t|hen go t|
|000019e0| 6f 20 66 72 61 6d 65 20 | 36 36 0d 69 66 20 70 75 |o frame |66.if pu|
|000019f0| 73 68 70 20 3d 20 22 73 | 68 6f 6f 74 22 20 74 68 |shp = "s|hoot" th|
|00001a00| 65 6e 20 67 6f 20 74 6f | 20 66 72 61 6d 65 20 36 |en go to| frame 6|
|00001a10| 38 0d 69 66 20 70 75 73 | 68 70 20 3d 20 22 64 6f |8.if pus|hp = "do|
|00001a20| 77 6e 22 20 74 68 65 6e | 20 67 6f 20 74 6f 20 66 |wn" then| go to f|
|00001a30| 72 61 6d 65 20 37 30 0d | 0d 69 66 20 74 68 65 20 |rame 70.|.if the |
|00001a40| 6d 6f 76 69 65 74 69 6d | 65 20 6f 66 20 73 70 72 |movietim|e of spr|
|00001a50| 69 74 65 20 38 20 3c 20 | 74 68 65 20 64 75 72 61 |ite 8 < |the dura|
|00001a60| 74 69 6f 6e 20 6f 66 20 | 63 61 73 74 20 41 32 36 |tion of |cast A26|
|00001a70| 20 74 68 65 6e 0d 20 20 | 20 20 67 6f 20 74 68 65 | then.  |  go the|
|00001a80| 20 66 72 61 6d 65 0d 65 | 6c 73 65 0d 20 20 20 20 | frame.e|lse.    |
|00001a90| 67 6f 20 74 6f 20 22 6a | 74 73 35 22 0d 65 6e 64 |go to "j|ts5".end|
|00001aa0| 20 69 66 0d 0d 69 66 20 | 74 68 65 20 6d 6f 76 69 | if..if |the movi|
|00001ab0| 65 74 69 6d 65 20 6f 66 | 20 73 70 72 69 74 65 20 |etime of| sprite |
|00001ac0| 38 20 3c 20 74 68 65 20 | 64 75 72 61 74 69 6f 6e |8 < the |duration|
|00001ad0| 20 6f 66 20 63 61 73 74 | 20 41 32 36 20 74 68 65 | of cast| A26 the|
|00001ae0| 6e 20 0d 20 20 20 20 67 | 6f 20 74 6f 20 66 72 61 |n .    g|o to fra|
|00001af0| 6d 65 20 36 36 0d 65 6c | 73 65 0d 20 20 20 20 67 |me 66.el|se.    g|
|00001b00| 6f 20 74 6f 20 22 6a 74 | 73 35 22 0d 65 6e 64 20 |o to "jt|s5".end |
|00001b10| 69 66 0d 0d 69 66 20 74 | 68 65 20 6d 6f 76 69 65 |if..if t|he movie|
|00001b20| 74 69 6d 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |time of |sprite 8|
|00001b30| 20 3c 20 74 68 65 20 64 | 75 72 61 74 69 6f 6e 20 | < the d|uration |
|00001b40| 6f 66 20 63 61 73 74 20 | 41 32 36 20 74 68 65 6e |of cast |A26 then|
|00001b50| 20 0d 20 20 20 20 67 6f | 20 74 6f 20 66 72 61 6d | .    go| to fram|
|00001b60| 65 20 36 38 0d 65 6c 73 | 65 0d 20 20 20 20 67 6f |e 68.els|e.    go|
|00001b70| 20 74 6f 20 22 6a 74 73 | 35 22 0d 65 6e 64 20 69 | to "jts|5".end i|
|00001b80| 66 0d 67 6c 6f 62 61 6c | 20 70 75 73 68 70 0d 69 |f.global| pushp.i|
|00001b90| 66 20 28 74 68 65 20 6d | 6f 76 69 65 74 69 6d 65 |f (the m|ovietime|
|00001ba0| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3c 20 74 | of spri|te 8 < t|
|00001bb0| 68 65 20 64 75 72 61 74 | 69 6f 6e 20 6f 66 20 63 |he durat|ion of c|
|00001bc0| 61 73 74 20 41 31 32 29 | 20 61 6e 64 20 28 70 75 |ast A12)| and (pu|
|00001bd0| 73 68 70 20 3d 20 22 22 | 20 29 20 20 74 68 65 6e |shp = ""| )  then|
|00001be0| 0d 20 20 20 20 67 6f 20 | 74 6f 20 20 66 72 61 6d |.    go |to  fram|
|00001bf0| 65 20 31 33 0d 65 6e 64 | 20 69 66 0d 0d 0d 0d 0d |e 13.end| if.....|
|00001c00| 0d 0d 0d 69 66 20 74 68 | 65 20 6d 6f 76 69 65 74 |...if th|e moviet|
|00001c10| 69 6d 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ime of s|prite 8 |
|00001c20| 3c 20 74 68 65 20 64 75 | 72 61 74 69 6f 6e 20 6f |< the du|ration o|
|00001c30| 66 20 63 61 73 74 20 41 | 32 36 20 74 68 65 6e 20 |f cast A|26 then |
|00001c40| 0d 20 20 20 20 67 6f 20 | 74 6f 20 66 72 61 6d 65 |.    go |to frame|
|00001c50| 20 37 30 0d 65 6c 73 65 | 0d 20 20 20 20 67 6f 20 | 70.else|.    go |
|00001c60| 74 6f 20 22 6a 74 73 35 | 22 0d 65 6e 64 20 69 66 |to "jts5|".end if|
|00001c70| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 70 0d 0d 2d |.global |pushp..-|
|00001c80| 2d 67 6f 6f 64 82 aa 90 | b3 89 f0 0d 69 66 20 70 |-good...|....if p|
|00001c90| 75 73 68 70 20 3d 20 22 | 22 20 74 68 65 6e 20 67 |ushp = "|" then g|
|00001ca0| 6f 20 74 6f 20 22 4e 73 | 6c 63 74 22 0d 69 66 20 |o to "Ns|lct".if |
|00001cb0| 70 75 73 68 70 20 3d 20 | 22 73 68 6f 6f 74 22 20 |pushp = |"shoot" |
|00001cc0| 74 68 65 6e 20 67 6f 20 | 74 6f 20 22 73 68 6f 6f |then go |to "shoo|
|00001cd0| 74 22 0d 69 66 20 70 75 | 73 68 70 20 3d 20 22 64 |t".if pu|shp = "d|
|00001ce0| 6f 77 6e 22 20 74 68 65 | 6e 20 67 6f 20 74 6f 20 |own" the|n go to |
|00001cf0| 22 64 6f 77 6e 22 0d 0d | 67 6c 6f 62 61 6c 20 70 |"down"..|global p|
|00001d00| 75 73 68 70 0d 0d 73 65 | 74 20 74 68 65 20 74 79 |ushp..se|t the ty|
|00001d10| 70 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3d |pe of sp|rite 8 =|
|00001d20| 20 31 36 0d 73 65 74 20 | 74 68 65 20 6d 6f 76 69 | 16.set |the movi|
|00001d30| 65 72 61 74 65 20 6f 66 | 20 73 70 72 69 74 65 20 |erate of| sprite |
|00001d40| 38 20 3d 20 31 0d 69 66 | 20 70 75 73 68 70 20 3d |8 = 1.if| pushp =|
|00001d50| 20 22 67 6f 6f 64 22 20 | 74 68 65 6e 20 67 6f 20 | "good" |then go |
|00001d60| 74 6f 20 66 72 61 6d 65 | 20 37 36 0d 69 66 20 70 |to frame| 76.if p|
|00001d70| 75 73 68 70 20 3d 20 22 | 73 68 6f 6f 74 22 20 74 |ushp = "|shoot" t|
|00001d80| 68 65 6e 20 67 6f 20 74 | 6f 20 66 72 61 6d 65 20 |hen go t|o frame |
|00001d90| 37 38 0d 69 66 20 70 75 | 73 68 70 20 3d 20 22 64 |78.if pu|shp = "d|
|00001da0| 6f 77 6e 22 20 74 68 65 | 6e 20 67 6f 20 74 6f 20 |own" the|n go to |
|00001db0| 66 72 61 6d 65 20 38 30 | 0d 0d 69 66 20 74 68 65 |frame 80|..if the|
|00001dc0| 20 6d 6f 76 69 65 74 69 | 6d 65 20 6f 66 20 73 70 | movieti|me of sp|
|00001dd0| 72 69 74 65 20 38 20 3c | 20 74 68 65 20 64 75 72 |rite 8 <| the dur|
|00001de0| 61 74 69 6f 6e 20 6f 66 | 20 63 61 73 74 20 41 32 |ation of| cast A2|
|00001df0| 37 20 74 68 65 6e 0d 20 | 20 20 20 67 6f 20 74 68 |7 then. |   go th|
|00001e00| 65 20 66 72 61 6d 65 0d | 65 6c 73 65 0d 20 20 20 |e frame.|else.   |
|00001e10| 20 67 6f 20 74 6f 20 22 | 6a 74 73 33 22 0d 65 6e | go to "|jts3".en|
|00001e20| 64 20 69 66 0d 0d 69 66 | 20 74 68 65 20 6d 6f 76 |d if..if| the mov|
|00001e30| 69 65 74 69 6d 65 20 6f | 66 20 73 70 72 69 74 65 |ietime o|f sprite|
|00001e40| 20 38 20 3c 20 74 68 65 | 20 64 75 72 61 74 69 6f | 8 < the| duratio|
|00001e50| 6e 20 6f 66 20 63 61 73 | 74 20 41 32 37 20 74 68 |n of cas|t A27 th|
|00001e60| 65 6e 20 0d 20 20 20 20 | 67 6f 20 74 6f 20 66 72 |en .    |go to fr|
|00001e70| 61 6d 65 20 37 36 0d 65 | 6c 73 65 0d 20 20 20 20 |ame 76.e|lse.    |
|00001e80| 67 6f 20 74 6f 20 22 6a | 74 73 33 22 0d 65 6e 64 |go to "j|ts3".end|
|00001e90| 20 69 66 0d 0d 69 66 20 | 74 68 65 20 6d 6f 76 69 | if..if |the movi|
|00001ea0| 65 74 69 6d 65 20 6f 66 | 20 73 70 72 69 74 65 20 |etime of| sprite |
|00001eb0| 38 20 3c 20 74 68 65 20 | 64 75 72 61 74 69 6f 6e |8 < the |duration|
|00001ec0| 20 6f 66 20 63 61 73 74 | 20 41 32 37 20 74 68 65 | of cast| A27 the|
|00001ed0| 6e 20 0d 20 20 20 20 67 | 6f 20 74 6f 20 66 72 61 |n .    g|o to fra|
|00001ee0| 6d 65 20 37 38 0d 65 6c | 73 65 0d 20 20 20 20 67 |me 78.el|se.    g|
|00001ef0| 6f 20 74 6f 20 22 6a 74 | 73 33 22 0d 65 6e 64 20 |o to "jt|s3".end |
|00001f00| 69 66 0d 69 66 20 74 68 | 65 20 6d 6f 76 69 65 74 |if.if th|e moviet|
|00001f10| 69 6d 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ime of s|prite 8 |
|00001f20| 3c 20 74 68 65 20 64 75 | 72 61 74 69 6f 6e 20 6f |< the du|ration o|
|00001f30| 66 20 63 61 73 74 20 41 | 32 37 20 74 68 65 6e 20 |f cast A|27 then |
|00001f40| 0d 20 20 20 20 67 6f 20 | 74 6f 20 66 72 61 6d 65 |.    go |to frame|
|00001f50| 20 38 30 0d 65 6c 73 65 | 0d 20 20 20 20 67 6f 20 | 80.else|.    go |
|00001f60| 74 6f 20 22 6a 74 73 33 | 22 0d 65 6e 64 20 69 66 |to "jts3|".end if|
|00001f70| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 74 2c 70 75 |.global |pusht,pu|
|00001f80| 73 68 70 2c 73 63 6f 72 | 65 2c 6c 65 76 65 6c 0d |shp,scor|e,level.|
|00001f90| 0d 69 66 20 6c 65 76 65 | 6c 20 3d 20 22 65 61 73 |.if leve|l = "eas|
|00001fa0| 79 22 20 74 68 65 6e 20 | 70 75 74 20 69 6e 74 65 |y" then |put inte|
|00001fb0| 67 65 72 28 35 30 30 20 | 2b 20 73 63 6f 72 65 29 |ger(500 |+ score)|
|00001fc0| 20 69 6e 74 6f 20 67 65 | 74 0d 69 66 20 6c 65 76 | into ge|t.if lev|
|00001fd0| 65 6c 20 3d 20 22 6e 6f | 72 6d 61 6c 22 20 74 68 |el = "no|rmal" th|
|00001fe0| 65 6e 20 70 75 74 20 69 | 6e 74 65 67 65 72 28 31 |en put i|nteger(1|
|00001ff0| 30 30 30 20 2b 20 73 63 | 6f 72 65 29 20 69 6e 74 |000 + sc|ore) int|
|00002000| 6f 20 67 65 74 0d 69 66 | 20 6c 65 76 65 6c 20 3d |o get.if| level =|
|00002010| 20 22 68 61 72 64 22 20 | 74 68 65 6e 20 70 75 74 | "hard" |then put|
|00002020| 20 69 6e 74 65 67 65 72 | 28 31 35 30 30 20 2b 20 | integer|(1500 + |
|00002030| 73 63 6f 72 65 29 20 69 | 6e 74 6f 20 67 65 74 0d |score) i|nto get.|
|00002040| 0d 70 75 74 20 73 74 72 | 69 6e 67 28 67 65 74 29 |.put str|ing(get)|
|00002050| 20 69 6e 74 6f 20 73 63 | 6f 72 65 0d 73 65 74 20 | into sc|ore.set |
|00002060| 74 68 65 20 74 65 78 74 | 20 6f 66 20 63 61 73 74 |the text| of cast|
|00002070| 20 22 73 63 6f 72 65 22 | 20 3d 20 73 63 6f 72 65 | "score"| = score|
|00002080| 0d 0d 70 75 74 20 30 20 | 69 6e 74 6f 20 70 75 73 |..put 0 |into pus|
|00002090| 68 74 0d 70 75 74 20 22 | 22 20 69 6e 74 6f 20 70 |ht.put "|" into p|
|000020a0| 75 73 68 70 0d 0d 67 6c | 6f 62 61 6c 20 70 75 73 |ushp..gl|obal pus|
|000020b0| 68 74 2c 70 75 73 68 70 | 2c 73 63 6f 72 65 0d 0d |ht,pushp|,score..|
|000020c0| 2d 2d 6e 6f 72 6d 61 6c | 0d 69 66 20 68 61 6c 66 |--normal|.if half|
|000020d0| 20 3d 20 30 20 74 68 65 | 6e 0d 20 20 20 20 70 75 | = 0 the|n.    pu|
|000020e0| 74 20 69 6e 74 65 67 65 | 72 28 31 30 30 30 30 20 |t intege|r(10000 |
|000020f0| 2b 20 73 63 6f 72 65 29 | 20 69 6e 74 6f 20 67 65 |+ score)| into ge|
|00002100| 74 0d 65 6c 73 65 0d 20 | 20 20 20 70 75 74 20 69 |t.else. |   put i|
|00002110| 6e 74 65 67 65 72 28 32 | 30 30 30 20 2b 20 73 63 |nteger(2|000 + sc|
|00002120| 6f 72 65 29 20 69 6e 74 | 6f 20 67 65 74 0d 65 6e |ore) int|o get.en|
|00002130| 64 20 69 66 0d 0d 70 75 | 74 20 73 74 72 69 6e 67 |d if..pu|t string|
|00002140| 28 67 65 74 29 20 69 6e | 74 6f 20 73 63 6f 72 65 |(get) in|to score|
|00002150| 0d 73 65 74 20 74 68 65 | 20 74 65 78 74 20 6f 66 |.set the| text of|
|00002160| 20 63 61 73 74 20 22 73 | 63 6f 72 65 22 20 3d 20 | cast "s|core" = |
|00002170| 73 63 6f 72 65 0d 0d 70 | 75 74 20 30 20 69 6e 74 |score..p|ut 0 int|
|00002180| 6f 20 70 75 73 68 74 0d | 70 75 74 20 22 22 20 69 |o pusht.|put "" i|
|00002190| 6e 74 6f 20 70 75 73 68 | 70 0d 0d 67 6f 20 74 6f |nto push|p..go to|
|000021a0| 20 22 66 69 6e 22 0d 67 | 6c 6f 62 61 6c 20 70 75 | "fin".g|lobal pu|
|000021b0| 73 68 74 2c 70 75 73 68 | 70 2c 73 63 6f 72 65 0d |sht,push|p,score.|
|000021c0| 2d 2d 68 61 72 64 0d 69 | 66 20 68 61 6c 66 20 3d |--hard.i|f half =|
|000021d0| 20 30 20 74 68 65 6e 0d | 20 20 20 20 70 75 74 20 | 0 then.|    put |
|000021e0| 69 6e 74 65 67 65 72 28 | 32 30 30 30 30 20 2b 20 |integer(|20000 + |
|000021f0| 73 63 6f 72 65 29 20 69 | 6e 74 6f 20 67 65 74 0d |score) i|nto get.|
|00002200| 65 6c 73 65 0d 20 20 20 | 20 70 75 74 20 69 6e 74 |else.   | put int|
|00002210| 65 67 65 72 28 33 30 30 | 30 20 2b 20 73 63 6f 72 |eger(300|0 + scor|
|00002220| 65 29 20 69 6e 74 6f 20 | 67 65 74 0d 65 6e 64 20 |e) into |get.end |
|00002230| 69 66 0d 0d 70 75 74 20 | 73 74 72 69 6e 67 28 67 |if..put |string(g|
|00002240| 65 74 29 20 69 6e 74 6f | 20 73 63 6f 72 65 0d 73 |et) into| score.s|
|00002250| 65 74 20 74 68 65 20 74 | 65 78 74 20 6f 66 20 63 |et the t|ext of c|
|00002260| 61 73 74 20 22 73 63 6f | 72 65 22 20 3d 20 73 63 |ast "sco|re" = sc|
|00002270| 6f 72 65 0d 0d 70 75 74 | 20 30 20 69 6e 74 6f 20 |ore..put| 0 into |
|00002280| 70 75 73 68 74 0d 70 75 | 74 20 22 22 20 69 6e 74 |pusht.pu|t "" int|
|00002290| 6f 20 70 75 73 68 70 0d | 0d 67 6f 20 74 6f 20 22 |o pushp.|.go to "|
|000022a0| 66 69 6e 22 0d 0d 67 6c | 6f 62 61 6c 20 70 75 73 |fin"..gl|obal pus|
|000022b0| 68 74 2c 70 75 73 68 70 | 2c 68 61 6c 66 0d 73 65 |ht,pushp|,half.se|
|000022c0| 74 20 74 68 65 20 74 79 | 70 65 20 6f 66 20 73 70 |t the ty|pe of sp|
|000022d0| 72 69 74 65 20 38 20 3d | 20 31 36 0d 73 65 74 20 |rite 8 =| 16.set |
|000022e0| 74 68 65 20 6d 6f 76 69 | 65 72 61 74 65 20 6f 66 |the movi|erate of|
|000022f0| 20 73 70 72 69 74 65 20 | 38 20 3d 20 31 0d 0d 69 | sprite |8 = 1..i|
|00002300| 66 20 74 68 65 20 6d 6f | 76 69 65 74 69 6d 65 20 |f the mo|vietime |
|00002310| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3c 20 74 68 |of sprit|e 8 < th|
|00002320| 65 20 64 75 72 61 74 69 | 6f 6e 20 6f 66 20 63 61 |e durati|on of ca|
|00002330| 73 74 20 42 32 32 20 74 | 68 65 6e 20 0d 20 20 20 |st B22 t|hen .   |
|00002340| 20 67 6f 20 74 68 65 20 | 66 72 61 6d 65 0d 65 6c | go the |frame.el|
|00002350| 73 65 0d 20 20 20 20 67 | 6f 20 74 6f 20 22 72 6f |se.    g|o to "ro|
|00002360| 6f 64 61 22 0d 65 6e 64 | 20 69 66 0d 0d 70 75 74 |oda".end| if..put|
|00002370| 20 30 20 69 6e 74 6f 20 | 70 75 73 68 74 0d 70 75 | 0 into |pusht.pu|
|00002380| 74 20 22 22 20 69 6e 74 | 6f 20 70 75 73 68 70 0d |t "" int|o pushp.|
|00002390| 70 75 74 20 31 20 69 6e | 74 6f 20 68 61 6c 66 0d |put 1 in|to half.|
|000023a0| 67 6c 6f 62 61 6c 20 70 | 75 73 68 74 2c 70 75 73 |global p|usht,pus|
|000023b0| 68 70 2c 68 61 6c 66 0d | 73 65 74 20 74 68 65 20 |hp,half.|set the |
|000023c0| 74 79 70 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |type of |sprite 8|
|000023d0| 20 3d 20 31 36 0d 73 65 | 74 20 74 68 65 20 6d 6f | = 16.se|t the mo|
|000023e0| 76 69 65 72 61 74 65 20 | 6f 66 20 73 70 72 69 74 |vierate |of sprit|
|000023f0| 65 20 38 20 3d 20 31 0d | 0d 69 66 20 74 68 65 20 |e 8 = 1.|.if the |
|00002400| 6d 6f 76 69 65 74 69 6d | 65 20 6f 66 20 73 70 72 |movietim|e of spr|
|00002410| 69 74 65 20 38 20 3c 20 | 74 68 65 20 64 75 72 61 |ite 8 < |the dura|
|00002420| 74 69 6f 6e 20 6f 66 20 | 63 61 73 74 20 42 32 33 |tion of |cast B23|
|00002430| 20 74 68 65 6e 20 0d 20 | 20 20 20 67 6f 20 74 68 | then . |   go th|
|00002440| 65 20 66 72 61 6d 65 0d | 65 6c 73 65 0d 20 20 20 |e frame.|else.   |
|00002450| 20 67 6f 20 74 6f 20 22 | 72 6f 6f 64 61 22 0d 65 | go to "|rooda".e|
|00002460| 6e 64 20 69 66 0d 0d 70 | 75 74 20 30 20 69 6e 74 |nd if..p|ut 0 int|
|00002470| 6f 20 70 75 73 68 74 0d | 70 75 74 20 22 22 20 69 |o pusht.|put "" i|
|00002480| 6e 74 6f 20 70 75 73 68 | 70 0d 70 75 74 20 31 20 |nto push|p.put 1 |
|00002490| 69 6e 74 6f 20 68 61 6c | 66 0d 67 6c 6f 62 61 6c |into hal|f.global|
|000024a0| 20 70 75 73 68 74 2c 70 | 75 73 68 70 2c 68 61 6c | pusht,p|ushp,hal|
|000024b0| 66 0d 73 65 74 20 74 68 | 65 20 74 79 70 65 20 6f |f.set th|e type o|
|000024c0| 66 20 73 70 72 69 74 65 | 20 38 20 3d 20 31 36 0d |f sprite| 8 = 16.|
|000024d0| 73 65 74 20 74 68 65 20 | 6d 6f 76 69 65 72 61 74 |set the |movierat|
|000024e0| 65 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 3d 20 |e of spr|ite 8 = |
|000024f0| 31 0d 0d 69 66 20 74 68 | 65 20 6d 6f 76 69 65 74 |1..if th|e moviet|
|00002500| 69 6d 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ime of s|prite 8 |
|00002510| 3c 20 74 68 65 20 64 75 | 72 61 74 69 6f 6e 20 6f |< the du|ration o|
|00002520| 66 20 63 61 73 74 20 42 | 32 34 20 74 68 65 6e 0d |f cast B|24 then.|
|00002530| 20 20 20 20 67 6f 20 74 | 68 65 20 66 72 61 6d 65 |    go t|he frame|
|00002540| 0d 65 6c 73 65 0d 20 20 | 20 20 67 6f 20 74 6f 20 |.else.  |  go to |
|00002550| 22 72 6f 6f 64 61 22 0d | 65 6e 64 20 69 66 0d 0d |"rooda".|end if..|
|00002560| 70 75 74 20 30 20 69 6e | 74 6f 20 70 75 73 68 74 |put 0 in|to pusht|
|00002570| 0d 70 75 74 20 22 22 20 | 69 6e 74 6f 20 70 75 73 |.put "" |into pus|
|00002580| 68 70 0d 70 75 74 20 31 | 20 69 6e 74 6f 20 68 61 |hp.put 1| into ha|
|00002590| 6c 66 0d 67 6c 6f 62 61 | 6c 20 70 75 73 68 74 2c |lf.globa|l pusht,|
|000025a0| 70 75 73 68 70 2c 73 63 | 6f 72 65 2c 68 61 6c 66 |pushp,sc|ore,half|
|000025b0| 2c 6c 65 76 65 6c 0d 0d | 69 66 20 68 61 6c 66 20 |,level..|if half |
|000025c0| 3d 20 30 20 74 68 65 6e | 0d 20 20 20 20 69 66 20 |= 0 then|.    if |
|000025d0| 6c 65 76 65 6c 20 3d 20 | 22 65 61 73 79 22 20 74 |level = |"easy" t|
|000025e0| 68 65 6e 20 70 75 74 20 | 69 6e 74 65 67 65 72 28 |hen put |integer(|
|000025f0| 31 30 30 30 20 2b 20 73 | 63 6f 72 65 29 20 69 6e |1000 + s|core) in|
|00002600| 74 6f 20 67 65 74 0d 20 | 20 20 20 69 66 20 6c 65 |to get. |   if le|
|00002610| 76 65 6c 20 3d 20 22 6e | 6f 72 6d 61 6c 22 20 74 |vel = "n|ormal" t|
|00002620| 68 65 6e 20 70 75 74 20 | 69 6e 74 65 67 65 72 28 |hen put |integer(|
|00002630| 31 35 30 30 20 2b 20 73 | 63 6f 72 65 29 20 69 6e |1500 + s|core) in|
|00002640| 74 6f 20 67 65 74 0d 20 | 20 20 20 69 66 20 6c 65 |to get. |   if le|
|00002650| 76 65 6c 20 3d 20 22 68 | 61 72 64 22 20 74 68 65 |vel = "h|ard" the|
|00002660| 6e 20 70 75 74 20 69 6e | 74 65 67 65 72 28 32 30 |n put in|teger(20|
|00002670| 30 30 20 2b 20 73 63 6f | 72 65 29 20 69 6e 74 6f |00 + sco|re) into|
|00002680| 20 67 65 74 0d 20 20 20 | 20 65 6c 73 65 20 6e 6f | get.   | else no|
|00002690| 74 68 69 6e 67 0d 65 6c | 73 65 0d 20 20 20 20 69 |thing.el|se.    i|
|000026a0| 66 20 6c 65 76 65 6c 20 | 3d 20 22 65 61 73 79 22 |f level |= "easy"|
|000026b0| 20 74 68 65 6e 20 70 75 | 74 20 69 6e 74 65 67 65 | then pu|t intege|
|000026c0| 72 28 35 30 30 20 2b 20 | 73 63 6f 72 65 29 20 69 |r(500 + |score) i|
|000026d0| 6e 74 6f 20 67 65 74 0d | 20 20 20 20 69 66 20 6c |nto get.|    if l|
|000026e0| 65 76 65 6c 20 3d 20 22 | 6e 6f 72 6d 61 6c 22 20 |evel = "|normal" |
|000026f0| 74 68 65 6e 20 70 75 74 | 20 69 6e 74 65 67 65 72 |then put| integer|
|00002700| 28 31 30 30 30 20 2b 20 | 73 63 6f 72 65 29 20 69 |(1000 + |score) i|
|00002710| 6e 74 6f 20 67 65 74 0d | 20 20 20 20 69 66 20 6c |nto get.|    if l|
|00002720| 65 76 65 6c 20 3d 20 22 | 68 61 72 64 22 20 74 68 |evel = "|hard" th|
|00002730| 65 6e 20 70 75 74 20 69 | 6e 74 65 67 65 72 28 31 |en put i|nteger(1|
|00002740| 35 30 30 20 2b 20 73 63 | 6f 72 65 29 20 69 6e 74 |500 + sc|ore) int|
|00002750| 6f 20 67 65 74 0d 65 6e | 64 20 69 66 0d 0d 70 75 |o get.en|d if..pu|
|00002760| 74 20 73 74 72 69 6e 67 | 28 67 65 74 29 20 69 6e |t string|(get) in|
|00002770| 74 6f 20 73 63 6f 72 65 | 0d 73 65 74 20 74 68 65 |to score|.set the|
|00002780| 20 74 65 78 74 20 6f 66 | 20 63 61 73 74 20 22 73 | text of| cast "s|
|00002790| 63 6f 72 65 22 20 3d 20 | 73 63 6f 72 65 0d 0d 70 |core" = |score..p|
|000027a0| 75 74 20 30 20 69 6e 74 | 6f 20 70 75 73 68 74 0d |ut 0 int|o pusht.|
|000027b0| 70 75 74 20 22 22 20 69 | 6e 74 6f 20 70 75 73 68 |put "" i|nto push|
|000027c0| 70 0d 0d 0d 0d 0d 67 6c | 6f 62 61 6c 20 6c 65 76 |p.....gl|obal lev|
|000027d0| 65 6c 0d 0d 69 66 20 6c | 65 76 65 6c 20 3d 20 22 |el..if l|evel = "|
|000027e0| 6e 6f 72 6d 61 6c 22 20 | 74 68 65 6e 20 67 6f 20 |normal" |then go |
|000027f0| 74 6f 20 22 74 73 35 22 | 0d 69 66 20 6c 65 76 65 |to "ts5"|.if leve|
|00002800| 6c 20 3d 20 22 68 61 72 | 64 22 20 74 68 65 6e 20 |l = "har|d" then |
|00002810| 67 6f 20 74 6f 20 22 74 | 73 33 22 0d 0d 67 6c 6f |go to "t|s3"..glo|
|00002820| 62 61 6c 20 70 6c 61 79 | 65 72 0d 0d 70 75 74 20 |bal play|er..put |
|00002830| 70 6c 61 79 65 72 20 69 | 6e 74 6f 20 70 6c 79 0d |player i|nto ply.|
|00002840| 70 75 74 20 73 74 72 69 | 6e 67 28 70 6c 79 29 20 |put stri|ng(ply) |
|00002850| 69 6e 74 6f 20 70 6c 61 | 79 65 72 0d 73 65 74 20 |into pla|yer.set |
|00002860| 74 68 65 20 74 65 78 74 | 20 6f 66 20 63 61 73 74 |the text| of cast|
|00002870| 20 41 34 34 20 3d 20 70 | 6c 61 79 65 72 0d 67 6c | A44 = p|layer.gl|
|00002880| 6f 62 61 6c 20 70 75 73 | 68 70 0d 0d 69 66 20 28 |obal pus|hp..if (|
|00002890| 74 68 65 20 6d 6f 76 69 | 65 74 69 6d 65 20 6f 66 |the movi|etime of|
|000028a0| 20 73 70 72 69 74 65 20 | 38 20 3c 20 74 68 65 20 | sprite |8 < the |
|000028b0| 64 75 72 61 74 69 6f 6e | 20 6f 66 20 63 61 73 74 |duration| of cast|
|000028c0| 20 41 31 34 29 20 61 6e | 64 20 28 70 75 73 68 70 | A14) an|d (pushp|
|000028d0| 20 3d 20 22 22 29 20 74 | 68 65 6e 0d 20 20 20 20 | = "") t|hen.    |
|000028e0| 67 6f 20 74 6f 20 66 72 | 61 6d 65 20 32 33 0d 65 |go to fr|ame 23.e|
|000028f0| 6e 64 20 69 66 0d 0d 67 | 6c 6f 62 61 6c 20 6d 73 |nd if..g|lobal ms|
|00002900| 67 0d 0d 73 65 74 20 74 | 68 65 20 74 79 70 65 20 |g..set t|he type |
|00002910| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3d 20 31 36 |of sprit|e 8 = 16|
|00002920| 0d 73 65 74 20 74 68 65 | 20 6d 6f 76 69 65 72 61 |.set the| moviera|
|00002930| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3d |te of sp|rite 8 =|
|00002940| 20 31 0d 0d 70 75 74 20 | 22 41 2e 44 2e 33 30 30 | 1..put |"A.D.300|
|00002950| 31 22 20 69 6e 74 6f 20 | 6d 73 0d 70 75 74 20 73 |1" into |ms.put s|
|00002960| 74 72 69 6e 67 28 6d 73 | 29 20 69 6e 74 6f 20 6d |tring(ms|) into m|
|00002970| 73 67 0d 73 65 74 20 74 | 68 65 20 74 65 78 74 20 |sg.set t|he text |
|00002980| 6f 66 20 63 61 73 74 20 | 41 35 37 20 3d 20 6d 73 |of cast |A57 = ms|
|00002990| 67 0d 0d 74 69 6b 61 74 | 69 6b 61 28 41 31 32 2c |g..tikat|ika(A12,|
|000029a0| 38 2c 31 30 30 2c 35 30 | 2c 33 30 29 0d 0d 0d 0d |8,100,50|,30)....|
|000029b0| 0d 0d 0d 0d 0d 0d 0d 67 | 6c 6f 62 61 6c 20 6d 73 |.......g|lobal ms|
|000029c0| 67 0d 0d 73 65 74 20 74 | 68 65 20 74 79 70 65 20 |g..set t|he type |
|000029d0| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3d 20 31 36 |of sprit|e 8 = 16|
|000029e0| 0d 73 65 74 20 74 68 65 | 20 6d 6f 76 69 65 72 61 |.set the| moviera|
|000029f0| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3d |te of sp|rite 8 =|
|00002a00| 20 31 0d 0d 70 75 74 20 | 22 41 2e 44 2e 33 30 30 | 1..put |"A.D.300|
|00002a10| 31 22 20 69 6e 74 6f 20 | 6d 73 0d 70 75 74 20 73 |1" into |ms.put s|
|00002a20| 74 72 69 6e 67 28 6d 73 | 29 20 69 6e 74 6f 20 6d |tring(ms|) into m|
|00002a30| 73 67 0d 73 65 74 20 74 | 68 65 20 74 65 78 74 20 |sg.set t|he text |
|00002a40| 6f 66 20 63 61 73 74 20 | 41 35 37 20 3d 20 6d 73 |of cast |A57 = ms|
|00002a50| 67 0d 0d 74 69 6b 61 74 | 69 6b 61 28 41 31 33 2c |g..tikat|ika(A13,|
|00002a60| 38 2c 31 30 30 2c 35 30 | 2c 33 30 29 0d 67 6c 6f |8,100,50|,30).glo|
|00002a70| 62 61 6c 20 6d 73 67 0d | 0d 73 65 74 20 74 68 65 |bal msg.|.set the|
|00002a80| 20 74 79 70 65 20 6f 66 | 20 73 70 72 69 74 65 20 | type of| sprite |
|00002a90| 38 20 3d 20 31 36 0d 73 | 65 74 20 74 68 65 20 6d |8 = 16.s|et the m|
|00002aa0| 6f 76 69 65 72 61 74 65 | 20 6f 66 20 73 70 72 69 |ovierate| of spri|
|00002ab0| 74 65 20 38 20 3d 20 31 | 0d 0d 70 75 74 20 22 41 |te 8 = 1|..put "A|
|00002ac0| 2e 44 2e 33 30 30 31 22 | 20 69 6e 74 6f 20 6d 73 |.D.3001"| into ms|
|00002ad0| 0d 70 75 74 20 73 74 72 | 69 6e 67 28 6d 73 29 20 |.put str|ing(ms) |
|00002ae0| 69 6e 74 6f 20 6d 73 67 | 0d 73 65 74 20 74 68 65 |into msg|.set the|
|00002af0| 20 74 65 78 74 20 6f 66 | 20 63 61 73 74 20 41 35 | text of| cast A5|
|00002b00| 37 20 3d 20 6d 73 67 0d | 0d 74 69 6b 61 74 69 6b |7 = msg.|.tikatik|
|00002b10| 61 28 41 31 34 2c 38 2c | 31 30 30 2c 35 30 2c 33 |a(A14,8,|100,50,3|
|00002b20| 30 29 0d 0d 67 6c 6f 62 | 61 6c 20 6d 73 67 0d 0d |0)..glob|al msg..|
|00002b30| 73 65 74 20 74 68 65 20 | 74 79 70 65 20 6f 66 20 |set the |type of |
|00002b40| 73 70 72 69 74 65 20 38 | 20 3d 20 31 36 0d 73 65 |sprite 8| = 16.se|
|00002b50| 74 20 74 68 65 20 6d 6f | 76 69 65 72 61 74 65 20 |t the mo|vierate |
|00002b60| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3d 20 31 0d |of sprit|e 8 = 1.|
|00002b70| 0d 70 75 74 20 22 41 2e | 44 2e 33 30 30 31 22 20 |.put "A.|D.3001" |
|00002b80| 69 6e 74 6f 20 6d 73 0d | 70 75 74 20 73 74 72 69 |into ms.|put stri|
|00002b90| 6e 67 28 6d 73 29 20 69 | 6e 74 6f 20 6d 73 67 0d |ng(ms) i|nto msg.|
|00002ba0| 73 65 74 20 74 68 65 20 | 74 65 78 74 20 6f 66 20 |set the |text of |
|00002bb0| 63 61 73 74 20 41 35 37 | 20 3d 20 6d 73 67 0d 0d |cast A57| = msg..|
|00002bc0| 74 69 6b 61 74 69 6b 61 | 28 41 31 36 2c 38 2c 31 |tikatika|(A16,8,1|
|00002bd0| 30 30 2c 35 30 2c 33 30 | 29 0d 67 6c 6f 62 61 6c |00,50,30|).global|
|00002be0| 20 6d 73 67 0d 0d 73 65 | 74 20 74 68 65 20 74 79 | msg..se|t the ty|
|00002bf0| 70 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3d |pe of sp|rite 8 =|
|00002c00| 20 31 36 0d 73 65 74 20 | 74 68 65 20 6d 6f 76 69 | 16.set |the movi|
|00002c10| 65 72 61 74 65 20 6f 66 | 20 73 70 72 69 74 65 20 |erate of| sprite |
|00002c20| 38 20 3d 20 31 0d 0d 70 | 75 74 20 22 41 2e 44 2e |8 = 1..p|ut "A.D.|
|00002c30| 33 30 30 31 22 20 69 6e | 74 6f 20 6d 73 0d 70 75 |3001" in|to ms.pu|
|00002c40| 74 20 73 74 72 69 6e 67 | 28 6d 73 29 20 69 6e 74 |t string|(ms) int|
|00002c50| 6f 20 6d 73 67 0d 73 65 | 74 20 74 68 65 20 74 65 |o msg.se|t the te|
|00002c60| 78 74 20 6f 66 20 63 61 | 73 74 20 41 35 37 20 3d |xt of ca|st A57 =|
|00002c70| 20 6d 73 67 0d 0d 74 69 | 6b 61 74 69 6b 61 28 41 | msg..ti|katika(A|
|00002c80| 31 37 2c 38 2c 31 30 30 | 2c 35 30 2c 33 30 29 0d |17,8,100|,50,30).|
|00002c90| 67 6c 6f 62 61 6c 20 6d | 73 67 0d 0d 73 65 74 20 |global m|sg..set |
|00002ca0| 74 68 65 20 74 79 70 65 | 20 6f 66 20 73 70 72 69 |the type| of spri|
|00002cb0| 74 65 20 38 20 3d 20 31 | 36 0d 73 65 74 20 74 68 |te 8 = 1|6.set th|
|00002cc0| 65 20 6d 6f 76 69 65 72 | 61 74 65 20 6f 66 20 73 |e movier|ate of s|
|00002cd0| 70 72 69 74 65 20 38 20 | 3d 20 31 0d 0d 70 75 74 |prite 8 |= 1..put|
|00002ce0| 20 22 41 2e 44 2e 33 30 | 30 31 22 20 69 6e 74 6f | "A.D.30|01" into|
|00002cf0| 20 6d 73 0d 70 75 74 20 | 73 74 72 69 6e 67 28 6d | ms.put |string(m|
|00002d00| 73 29 20 69 6e 74 6f 20 | 6d 73 67 0d 73 65 74 20 |s) into |msg.set |
|00002d10| 74 68 65 20 74 65 78 74 | 20 6f 66 20 63 61 73 74 |the text| of cast|
|00002d20| 20 41 35 37 20 3d 20 6d | 73 67 0d 0d 74 69 6b 61 | A57 = m|sg..tika|
|00002d30| 74 69 6b 61 28 41 31 38 | 2c 38 2c 31 30 30 2c 35 |tika(A18|,8,100,5|
|00002d40| 30 2c 33 30 29 0d 0d 0d | 67 6c 6f 62 61 6c 20 6d |0,30)...|global m|
|00002d50| 73 67 0d 0d 73 65 74 20 | 74 68 65 20 74 79 70 65 |sg..set |the type|
|00002d60| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3d 20 31 | of spri|te 8 = 1|
|00002d70| 36 0d 73 65 74 20 74 68 | 65 20 6d 6f 76 69 65 72 |6.set th|e movier|
|00002d80| 61 74 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ate of s|prite 8 |
|00002d90| 3d 20 31 0d 0d 70 75 74 | 20 22 41 2e 44 2e 33 30 |= 1..put| "A.D.30|
|00002da0| 30 31 22 20 69 6e 74 6f | 20 6d 73 0d 70 75 74 20 |01" into| ms.put |
|00002db0| 73 74 72 69 6e 67 28 6d | 73 29 20 69 6e 74 6f 20 |string(m|s) into |
|00002dc0| 6d 73 67 0d 73 65 74 20 | 74 68 65 20 74 65 78 74 |msg.set |the text|
|00002dd0| 20 6f 66 20 63 61 73 74 | 20 41 35 37 20 3d 20 6d | of cast| A57 = m|
|00002de0| 73 67 0d 0d 74 69 6b 61 | 74 69 6b 61 28 41 32 31 |sg..tika|tika(A21|
|00002df0| 2c 38 2c 31 30 30 2c 35 | 30 2c 33 30 29 0d 0d 0d |,8,100,5|0,30)...|
|00002e00| 67 6c 6f 62 61 6c 20 6d | 73 67 0d 0d 73 65 74 20 |global m|sg..set |
|00002e10| 74 68 65 20 74 79 70 65 | 20 6f 66 20 73 70 72 69 |the type| of spri|
|00002e20| 74 65 20 38 20 3d 20 31 | 36 0d 73 65 74 20 74 68 |te 8 = 1|6.set th|
|00002e30| 65 20 6d 6f 76 69 65 72 | 61 74 65 20 6f 66 20 73 |e movier|ate of s|
|00002e40| 70 72 69 74 65 20 38 20 | 3d 20 31 0d 0d 70 75 74 |prite 8 |= 1..put|
|00002e50| 20 22 41 2e 44 2e 33 30 | 30 31 22 20 69 6e 74 6f | "A.D.30|01" into|
|00002e60| 20 6d 73 0d 70 75 74 20 | 73 74 72 69 6e 67 28 6d | ms.put |string(m|
|00002e70| 73 29 20 69 6e 74 6f 20 | 6d 73 67 0d 73 65 74 20 |s) into |msg.set |
|00002e80| 74 68 65 20 74 65 78 74 | 20 6f 66 20 63 61 73 74 |the text| of cast|
|00002e90| 20 41 35 37 20 3d 20 6d | 73 67 0d 0d 74 69 6b 61 | A57 = m|sg..tika|
|00002ea0| 74 69 6b 61 28 41 32 32 | 2c 38 2c 31 30 30 2c 35 |tika(A22|,8,100,5|
|00002eb0| 30 2c 33 30 29 0d 0d 0d | 67 6c 6f 62 61 6c 20 70 |0,30)...|global p|
|00002ec0| 75 73 68 74 2c 70 75 73 | 68 70 2c 73 63 6f 72 65 |usht,pus|hp,score|
|00002ed0| 2c 68 61 6c 66 0d 0d 2d | 2d 65 61 73 79 0d 69 66 |,half..-|-easy.if|
|00002ee0| 20 68 61 6c 66 20 3d 20 | 30 20 74 68 65 6e 0d 20 | half = |0 then. |
|00002ef0| 20 20 20 70 75 74 20 69 | 6e 74 65 67 65 72 28 35 |   put i|nteger(5|
|00002f00| 30 30 30 20 2b 20 73 63 | 6f 72 65 29 20 69 6e 74 |000 + sc|ore) int|
|00002f10| 6f 20 67 65 74 0d 65 6c | 73 65 0d 20 20 20 20 70 |o get.el|se.    p|
|00002f20| 75 74 20 69 6e 74 65 67 | 65 72 28 31 30 30 30 20 |ut integ|er(1000 |
|00002f30| 2b 20 73 63 6f 72 65 29 | 20 69 6e 74 6f 20 67 65 |+ score)| into ge|
|00002f40| 74 0d 65 6e 64 20 69 66 | 0d 0d 70 75 74 20 73 74 |t.end if|..put st|
|00002f50| 72 69 6e 67 28 67 65 74 | 29 20 69 6e 74 6f 20 73 |ring(get|) into s|
|00002f60| 63 6f 72 65 0d 73 65 74 | 20 74 68 65 20 74 65 78 |core.set| the tex|
|00002f70| 74 20 6f 66 20 63 61 73 | 74 20 22 73 63 6f 72 65 |t of cas|t "score|
|00002f80| 22 20 3d 20 73 63 6f 72 | 65 0d 0d 70 75 74 20 30 |" = scor|e..put 0|
|00002f90| 20 69 6e 74 6f 20 70 75 | 73 68 74 0d 70 75 74 20 | into pu|sht.put |
|00002fa0| 22 22 20 69 6e 74 6f 20 | 70 75 73 68 70 0d 0d 67 |"" into |pushp..g|
|00002fb0| 6f 20 74 6f 20 22 66 69 | 6e 22 0d 0d 73 65 74 20 |o to "fi|n"..set |
|00002fc0| 74 68 65 20 74 79 70 65 | 20 6f 66 20 73 70 72 69 |the type| of spri|
|00002fd0| 74 65 20 38 20 3d 20 31 | 36 0d 73 65 74 20 74 68 |te 8 = 1|6.set th|
|00002fe0| 65 20 6d 6f 76 69 65 72 | 61 74 65 20 6f 66 20 73 |e movier|ate of s|
|00002ff0| 70 72 69 74 65 20 38 20 | 3d 20 31 0d 0d 69 66 20 |prite 8 |= 1..if |
|00003000| 74 68 65 20 6d 6f 76 69 | 65 74 69 6d 65 20 6f 66 |the movi|etime of|
|00003010| 20 73 70 72 69 74 65 20 | 38 20 3c 3e 20 74 68 65 | sprite |8 <> the|
|00003020| 20 64 75 72 61 74 69 6f | 6e 20 6f 66 20 63 61 73 | duratio|n of cas|
|00003030| 74 20 41 32 38 20 74 68 | 65 6e 20 67 6f 20 74 68 |t A28 th|en go th|
|00003040| 65 20 66 72 61 6d 65 0d | 0d 75 6e 6c 6f 61 64 0d |e frame.|.unload.|
|00003050| 0d 70 72 65 6c 6f 61 64 | 20 39 2c 31 32 30 0d 0d |.preload| 9,120..|
|00003060| 67 6c 6f 62 61 6c 20 70 | 75 73 68 74 2c 70 75 73 |global p|usht,pus|
|00003070| 68 70 0d 73 65 74 20 74 | 68 65 20 74 79 70 65 20 |hp.set t|he type |
|00003080| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3d 20 31 36 |of sprit|e 8 = 16|
|00003090| 0d 73 65 74 20 74 68 65 | 20 6d 6f 76 69 65 72 61 |.set the| moviera|
|000030a0| 74 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3d |te of sp|rite 8 =|
|000030b0| 20 31 0d 0d 69 66 20 74 | 68 65 20 6d 6f 76 69 65 | 1..if t|he movie|
|000030c0| 74 69 6d 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |time of |sprite 8|
|000030d0| 20 3c 20 74 68 65 20 64 | 75 72 61 74 69 6f 6e 20 | < the d|uration |
|000030e0| 6f 66 20 63 61 73 74 20 | 42 31 32 20 74 68 65 6e |of cast |B12 then|
|000030f0| 0d 20 20 20 20 67 6f 20 | 74 68 65 20 66 72 61 6d |.    go |the fram|
|00003100| 65 0d 65 6c 73 65 0d 20 | 20 20 20 67 6f 20 74 6f |e.else. |   go to|
|00003110| 20 22 72 6f 6f 64 61 22 | 0d 65 6e 64 20 69 66 0d | "rooda"|.end if.|
|00003120| 0d 0d 70 75 74 20 30 20 | 69 6e 74 6f 20 70 75 73 |..put 0 |into pus|
|00003130| 68 74 0d 70 75 74 20 22 | 22 20 69 6e 74 6f 20 70 |ht.put "|" into p|
|00003140| 75 73 68 70 0d          |                         |ushp.   |        |
+--------+-------------------------+-------------------------+--------+--------+